home *** CD-ROM | disk | FTP | other *** search
Emacs Compiled Lisp | 1998-05-21 | 14.2 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
100%
| file
| Emacs/XEmacs v20 byte-compiled Lisp data
| default
| |
99%
| file
| data
| default
| |
100%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 54 68 75 20 4a | 61 6e 20 32 32 20 31 34 |on Thu J|an 22 14|
|00000040| 3a 34 35 3a 32 37 20 31 | 39 39 38 0a 3b 3b 3b 20 |:45:27 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 78 65 | 6d 61 63 73 2d 32 30 2e |emacs/xe|macs-20.|
|00000090| 33 2f 6c 69 73 70 2f 70 | 61 63 6b 61 67 65 73 2f |3/lisp/p|ackages/|
|000000a0| 62 75 66 66 2d 6d 65 6e | 75 2e 65 6c 0a 3b 3b 3b |buff-men|u.el.;;;|
|000000b0| 20 65 6d 61 63 73 20 76 | 65 72 73 69 6f 6e 20 32 | emacs v|ersion 2|
|000000c0| 30 2e 33 20 22 56 61 74 | 69 63 61 6e 20 43 69 74 |0.3 "Vat|ican Cit|
|000000d0| 79 22 20 58 45 6d 61 63 | 73 20 20 4c 75 63 69 64 |y" XEmac|s Lucid|
|000000e0| 2e 0a 3b 3b 3b 20 62 79 | 74 65 63 6f 6d 70 20 76 |..;;; by|tecomp v|
|000000f0| 65 72 73 69 6f 6e 20 32 | 2e 32 35 20 58 45 6d 61 |ersion 2|.25 XEma|
|00000100| 63 73 3b 20 32 32 2d 4d | 61 72 2d 39 36 2e 0a 3b |cs; 22-M|ar-96..;|
|00000110| 3b 3b 20 6f 70 74 69 6d | 69 7a 61 74 69 6f 6e 20 |;; optim|ization |
|00000120| 69 73 20 6f 6e 2e 0a 3b | 3b 3b 20 74 68 69 73 20 |is on..;|;; this |
|00000130| 66 69 6c 65 20 75 73 65 | 73 20 6f 70 63 6f 64 65 |file use|s opcode|
|00000140| 73 20 77 68 69 63 68 20 | 64 6f 20 6e 6f 74 20 65 |s which |do not e|
|00000150| 78 69 73 74 20 69 6e 20 | 45 6d 61 63 73 20 31 39 |xist in |Emacs 19|
|00000160| 2e 0a 0a 28 69 66 20 28 | 61 6e 64 20 28 62 6f 75 |...(if (|and (bou|
|00000170| 6e 64 70 20 27 65 6d 61 | 63 73 2d 76 65 72 73 69 |ndp 'ema|cs-versi|
|00000180| 6f 6e 29 0a 09 20 28 6f | 72 20 28 61 6e 64 20 28 |on).. (o|r (and (|
|00000190| 62 6f 75 6e 64 70 20 27 | 65 70 6f 63 68 3a 3a 76 |boundp '|epoch::v|
|000001a0| 65 72 73 69 6f 6e 29 20 | 65 70 6f 63 68 3a 3a 76 |ersion) |epoch::v|
|000001b0| 65 72 73 69 6f 6e 29 0a | 09 20 20 20 20 20 28 73 |ersion).|. (s|
|000001c0| 74 72 69 6e 67 2d 6c 65 | 73 73 70 20 65 6d 61 63 |tring-le|ssp emac|
|000001d0| 73 2d 76 65 72 73 69 6f | 6e 20 22 32 30 22 29 29 |s-versio|n "20"))|
|000001e0| 29 0a 20 20 20 20 28 65 | 72 72 6f 72 20 22 60 62 |). (e|rror "`b|
|000001f0| 75 66 66 2d 6d 65 6e 75 | 2e 65 6c 27 20 77 61 73 |uff-menu|.el' was|
|00000200| 20 63 6f 6d 70 69 6c 65 | 64 20 66 6f 72 20 45 6d | compile|d for Em|
|00000210| 61 63 73 20 32 30 22 29 | 29 0a 0a 28 6f 72 20 28 |acs 20")|)..(or (|
|00000220| 62 6f 75 6e 64 70 20 27 | 63 75 72 72 65 6e 74 2d |boundp '|current-|
|00000230| 6c 6f 61 64 2d 6c 69 73 | 74 29 20 28 73 65 74 71 |load-lis|t) (setq|
|00000240| 20 63 75 72 72 65 6e 74 | 2d 6c 6f 61 64 2d 6c 69 | current|-load-li|
|00000250| 73 74 20 6e 69 6c 29 29 | 0a 0a 0a 28 62 79 74 65 |st nil))|...(byte|
|00000260| 2d 63 6f 64 65 20 22 c0 | c1 21 ac 82 c2 11 c1 0b |-code ".|.!......|
|00000270| 42 13 c0 87 22 20 5b 62 | 6f 75 6e 64 70 20 42 75 |B..." [b|oundp Bu|
|00000280| 66 66 65 72 2d 6d 65 6e | 75 2d 62 75 66 66 65 72 |ffer-men|u-buffer|
|00000290| 2d 63 6f 6c 75 6d 6e 20 | 34 20 63 75 72 72 65 6e |-column |4 curren|
|000002a0| 74 2d 6c 6f 61 64 2d 6c | 69 73 74 5d 20 32 29 0a |t-load-l|ist] 2).|
|000002b0| 23 40 32 20 1f 0a 28 64 | 65 66 76 61 72 20 42 75 |#@2 ..(d|efvar Bu|
|000002c0| 66 66 65 72 2d 6d 65 6e | 75 2d 6d 6f 64 65 2d 6d |ffer-men|u-mode-m|
|000002d0| 61 70 20 6e 69 6c 20 28 | 23 24 20 2e 20 36 39 32 |ap nil (|#$ . 692|
|000002e0| 29 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 08 |)).(byte|-code ".|
|000002f0| 84 b9 00 c1 20 10 c2 08 | c3 5c 22 88 c4 08 c0 5c |.... ...|.\"....\|
|00000300| 22 88 c5 08 c6 c7 23 88 | c5 08 c8 c9 23 88 c5 08 |".....#.|....#...|
|00000310| ca cb 23 88 c5 08 cc cd | 23 88 c5 08 ce cf 23 88 |..#.....|#.....#.|
|00000320| c5 08 d0 cf 23 88 c5 08 | d1 d2 23 88 c5 08 d3 d4 |....#...|..#.....|
|00000330| 23 88 c5 08 d5 d6 23 88 | c5 08 d7 d8 23 88 c5 08 |#.....#.|....#...|
|00000340| d9 d8 23 88 c5 08 da db | 23 88 c5 08 dc d8 23 88 |..#.....|#.....#.|
|00000350| c5 08 dd de 23 88 c5 08 | df e0 23 88 c5 08 e1 e0 |....#...|..#.....|
|00000360| 23 88 c5 08 e2 e3 23 88 | c5 08 e4 e5 23 88 c5 08 |#.....#.|....#...|
|00000370| e6 e5 23 88 c5 08 e7 e8 | 23 88 c5 08 e9 ea 23 88 |..#.....|#.....#.|
|00000380| c5 08 eb ec 23 88 c5 08 | ed ee 23 88 c5 08 ef f0 |....#...|..#.....|
|00000390| 23 88 c5 08 f1 f2 23 88 | c5 08 f3 f4 23 88 c5 08 |#.....#.|....#...|
|000003a0| f5 f6 23 88 c5 08 f7 f8 | 23 88 f9 fa fb fc 23 87 |..#.....|#.....#.|
|000003b0| 22 20 5b 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 6d |" [Buffe|r-menu-m|
|000003c0| 6f 64 65 2d 6d 61 70 20 | 6d 61 6b 65 2d 6b 65 79 |ode-map |make-key|
|000003d0| 6d 61 70 20 73 75 70 70 | 72 65 73 73 2d 6b 65 79 |map supp|ress-key|
|000003e0| 6d 61 70 20 74 20 73 65 | 74 2d 6b 65 79 6d 61 70 |map t se|t-keymap|
|000003f0| 2d 6e 61 6d 65 20 64 65 | 66 69 6e 65 2d 6b 65 79 |-name de|fine-key|
|00000400| 20 22 71 22 20 42 75 66 | 66 65 72 2d 6d 65 6e 75 | "q" Buf|fer-menu|
|00000410| 2d 71 75 69 74 20 22 76 | 22 20 42 75 66 66 65 72 |-quit "v|" Buffer|
|00000420| 2d 6d 65 6e 75 2d 73 65 | 6c 65 63 74 20 22 32 22 |-menu-se|lect "2"|
|00000430| 20 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 32 2d 77 | Buffer-|menu-2-w|
|00000440| 69 6e 64 6f 77 20 22 31 | 22 20 42 75 66 66 65 72 |indow "1|" Buffer|
|00000450| 2d 6d 65 6e 75 2d 31 2d | 77 69 6e 64 6f 77 20 22 |-menu-1-|window "|
|00000460| 66 22 20 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 74 |f" Buffe|r-menu-t|
|00000470| 68 69 73 2d 77 69 6e 64 | 6f 77 20 22 0d 22 20 22 |his-wind|ow "." "|
|00000480| 6f 22 20 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 6f |o" Buffe|r-menu-o|
|00000490| 74 68 65 72 2d 77 69 6e | 64 6f 77 20 22 0f 22 20 |ther-win|dow "." |
|000004a0| 42 75 66 66 65 72 2d 6d | 65 6e 75 2d 73 77 69 74 |Buffer-m|enu-swit|
|000004b0| 63 68 2d 6f 74 68 65 72 | 2d 77 69 6e 64 6f 77 20 |ch-other|-window |
|000004c0| 22 73 22 20 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |"s" Buff|er-menu-|
|000004d0| 73 61 76 65 20 22 64 22 | 20 42 75 66 66 65 72 2d |save "d"| Buffer-|
|000004e0| 6d 65 6e 75 2d 64 65 6c | 65 74 65 20 22 6b 22 20 |menu-del|ete "k" |
|000004f0| 22 04 22 20 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |"." Buff|er-menu-|
|00000500| 64 65 6c 65 74 65 2d 62 | 61 63 6b 77 61 72 64 73 |delete-b|ackwards|
|00000510| 20 22 0b 22 20 22 78 22 | 20 42 75 66 66 65 72 2d | "." "x"| Buffer-|
|00000520| 6d 65 6e 75 2d 65 78 65 | 63 75 74 65 20 22 20 22 |menu-exe|cute " "|
|00000530| 20 6e 65 78 74 2d 6c 69 | 6e 65 20 22 6e 22 20 22 | next-li|ne "n" "|
|00000540| 70 22 20 70 72 65 76 69 | 6f 75 73 2d 6c 69 6e 65 |p" previ|ous-line|
|00000550| 20 62 61 63 6b 73 70 61 | 63 65 20 42 75 66 66 65 | backspa|ce Buffe|
|00000560| 72 2d 6d 65 6e 75 2d 62 | 61 63 6b 75 70 2d 75 6e |r-menu-b|ackup-un|
|00000570| 6d 61 72 6b 20 64 65 6c | 65 74 65 20 22 7e 22 20 |mark del|ete "~" |
|00000580| 42 75 66 66 65 72 2d 6d | 65 6e 75 2d 6e 6f 74 2d |Buffer-m|enu-not-|
|00000590| 6d 6f 64 69 66 69 65 64 | 20 22 3f 22 20 64 65 73 |modified| "?" des|
|000005a0| 63 72 69 62 65 2d 6d 6f | 64 65 20 22 75 22 20 42 |cribe-mo|de "u" B|
|000005b0| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 75 6e 6d 61 72 |uffer-me|nu-unmar|
|000005c0| 6b 20 22 6d 22 20 42 75 | 66 66 65 72 2d 6d 65 6e |k "m" Bu|ffer-men|
|000005d0| 75 2d 6d 61 72 6b 20 22 | 74 22 20 42 75 66 66 65 |u-mark "|t" Buffe|
|000005e0| 72 2d 6d 65 6e 75 2d 76 | 69 73 69 74 2d 74 61 67 |r-menu-v|isit-tag|
|000005f0| 73 2d 74 61 62 6c 65 20 | 22 25 22 20 42 75 66 66 |s-table |"%" Buff|
|00000600| 65 72 2d 6d 65 6e 75 2d | 74 6f 67 67 6c 65 2d 72 |er-menu-|toggle-r|
|00000610| 65 61 64 2d 6f 6e 6c 79 | 20 22 67 22 20 72 65 76 |ead-only| "g" rev|
|00000620| 65 72 74 2d 62 75 66 66 | 65 72 20 62 75 74 74 6f |ert-buff|er butto|
|00000630| 6e 32 20 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 6d |n2 Buffe|r-menu-m|
|00000640| 6f 75 73 65 2d 73 65 6c | 65 63 74 20 62 75 74 74 |ouse-sel|ect butt|
|00000650| 6f 6e 33 20 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |on3 Buff|er-menu-|
|00000660| 70 6f 70 75 70 2d 6d 65 | 6e 75 20 70 75 74 20 42 |popup-me|nu put B|
|00000670| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 6d 6f 64 65 20 |uffer-me|nu-mode |
|00000680| 6d 6f 64 65 2d 63 6c 61 | 73 73 20 73 70 65 63 69 |mode-cla|ss speci|
|00000690| 61 6c 5d 20 34 29 0a 23 | 40 31 36 30 36 20 4d 61 |al] 4).#|@1606 Ma|
|000006a0| 6a 6f 72 20 6d 6f 64 65 | 20 66 6f 72 20 65 64 69 |jor mode| for edi|
|000006b0| 74 69 6e 67 20 61 20 6c | 69 73 74 20 6f 66 20 62 |ting a l|ist of b|
|000006c0| 75 66 66 65 72 73 2e 0a | 45 61 63 68 20 6c 69 6e |uffers..|Each lin|
|000006d0| 65 20 64 65 73 63 72 69 | 62 65 73 20 6f 6e 65 20 |e descri|bes one |
|000006e0| 6f 66 20 74 68 65 20 62 | 75 66 66 65 72 73 20 69 |of the b|uffers i|
|000006f0| 6e 20 45 6d 61 63 73 2e | 0a 4c 65 74 74 65 72 73 |n Emacs.|.Letters|
|00000700| 20 64 6f 20 6e 6f 74 20 | 69 6e 73 65 72 74 20 74 | do not |insert t|
|00000710| 68 65 6d 73 65 6c 76 65 | 73 3b 20 69 6e 73 74 65 |hemselve|s; inste|
|00000720| 61 64 2c 20 74 68 65 79 | 20 61 72 65 20 63 6f 6d |ad, they| are com|
|00000730| 6d 61 6e 64 73 2e 0a 5c | 3c 42 75 66 66 65 72 2d |mands..\|<Buffer-|
|00000740| 6d 65 6e 75 2d 6d 6f 64 | 65 2d 6d 61 70 3e 0a 5c |menu-mod|e-map>.\|
|00000750| 5b 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 6d 6f 75 |[Buffer-|menu-mou|
|00000760| 73 65 2d 73 65 6c 65 63 | 74 5d 20 2d 2d 20 73 65 |se-selec|t] -- se|
|00000770| 6c 65 63 74 20 62 75 66 | 66 65 72 20 79 6f 75 20 |lect buf|fer you |
|00000780| 63 6c 69 63 6b 20 6f 6e | 2c 20 69 6e 20 70 6c 61 |click on|, in pla|
|00000790| 63 65 20 6f 66 20 74 68 | 65 20 62 75 66 66 65 72 |ce of th|e buffer|
|000007a0| 20 6d 65 6e 75 2e 0a 5c | 5b 42 75 66 66 65 72 2d | menu..\|[Buffer-|
|000007b0| 6d 65 6e 75 2d 74 68 69 | 73 2d 77 69 6e 64 6f 77 |menu-thi|s-window|
|000007c0| 5d 20 2d 2d 20 73 65 6c | 65 63 74 20 63 75 72 72 |] -- sel|ect curr|
|000007d0| 65 6e 74 20 6c 69 6e 65 | 27 73 20 62 75 66 66 65 |ent line|'s buffe|
|000007e0| 72 20 69 6e 20 70 6c 61 | 63 65 20 6f 66 20 74 68 |r in pla|ce of th|
|000007f0| 65 20 62 75 66 66 65 72 | 20 6d 65 6e 75 2e 0a 5c |e buffer| menu..\|
|00000800| 5b 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 6f 74 68 |[Buffer-|menu-oth|
|00000810| 65 72 2d 77 69 6e 64 6f | 77 5d 20 2d 2d 20 73 65 |er-windo|w] -- se|
|00000820| 6c 65 63 74 20 74 68 61 | 74 20 62 75 66 66 65 72 |lect tha|t buffer|
|00000830| 20 69 6e 20 61 6e 6f 74 | 68 65 72 20 77 69 6e 64 | in anot|her wind|
|00000840| 6f 77 2c 0a 20 20 73 6f | 20 74 68 65 20 62 75 66 |ow,. so| the buf|
|00000850| 66 65 72 20 6d 65 6e 75 | 20 62 75 66 66 65 72 20 |fer menu| buffer |
|00000860| 72 65 6d 61 69 6e 73 20 | 76 69 73 69 62 6c 65 20 |remains |visible |
|00000870| 69 6e 20 69 74 73 20 77 | 69 6e 64 6f 77 2e 0a 5c |in its w|indow..\|
|00000880| 5b 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 73 77 69 |[Buffer-|menu-swi|
|00000890| 74 63 68 2d 6f 74 68 65 | 72 2d 77 69 6e 64 6f 77 |tch-othe|r-window|
|000008a0| 5d 20 2d 2d 20 6d 61 6b | 65 20 61 6e 6f 74 68 65 |] -- mak|e anothe|
|000008b0| 72 20 77 69 6e 64 6f 77 | 20 64 69 73 70 6c 61 79 |r window| display|
|000008c0| 20 74 68 61 74 20 62 75 | 66 66 65 72 2e 0a 5c 5b | that bu|ffer..\[|
|000008d0| 42 75 66 66 65 72 2d 6d | 65 6e 75 2d 6d 61 72 6b |Buffer-m|enu-mark|
|000008e0| 5d 20 2d 2d 20 6d 61 72 | 6b 20 63 75 72 72 65 6e |] -- mar|k curren|
|000008f0| 74 20 6c 69 6e 65 27 73 | 20 62 75 66 66 65 72 20 |t line's| buffer |
|00000900| 74 6f 20 62 65 20 64 69 | 73 70 6c 61 79 65 64 2e |to be di|splayed.|
|00000910| 0a 5c 5b 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 73 |.\[Buffe|r-menu-s|
|00000920| 65 6c 65 63 74 5d 20 2d | 2d 20 73 65 6c 65 63 74 |elect] -|- select|
|00000930| 20 63 75 72 72 65 6e 74 | 20 6c 69 6e 65 27 73 20 | current| line's |
|00000940| 62 75 66 66 65 72 2e 0a | 20 20 41 6c 73 6f 20 73 |buffer..| Also s|
|00000950| 68 6f 77 20 62 75 66 66 | 65 72 73 20 6d 61 72 6b |how buff|ers mark|
|00000960| 65 64 20 77 69 74 68 20 | 6d 2c 20 69 6e 20 6f 74 |ed with |m, in ot|
|00000970| 68 65 72 20 77 69 6e 64 | 6f 77 73 2e 0a 5c 5b 42 |her wind|ows..\[B|
|00000980| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 31 2d 77 69 6e |uffer-me|nu-1-win|
|00000990| 64 6f 77 5d 20 2d 2d 20 | 73 65 6c 65 63 74 20 74 |dow] -- |select t|
|000009a0| 68 61 74 20 62 75 66 66 | 65 72 20 69 6e 20 66 75 |hat buff|er in fu|
|000009b0| 6c 6c 2d 66 72 61 6d 65 | 20 77 69 6e 64 6f 77 2e |ll-frame| window.|
|000009c0| 0a 5c 5b 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 32 |.\[Buffe|r-menu-2|
|000009d0| 2d 77 69 6e 64 6f 77 5d | 20 2d 2d 20 73 65 6c 65 |-window]| -- sele|
|000009e0| 63 74 20 74 68 61 74 20 | 62 75 66 66 65 72 20 69 |ct that |buffer i|
|000009f0| 6e 20 6f 6e 65 20 77 69 | 6e 64 6f 77 2c 0a 20 20 |n one wi|ndow,. |
|00000a00| 74 6f 67 65 74 68 65 72 | 20 77 69 74 68 20 62 75 |together| with bu|
|00000a10| 66 66 65 72 20 73 65 6c | 65 63 74 65 64 20 62 65 |ffer sel|ected be|
|00000a20| 66 6f 72 65 20 74 68 69 | 73 20 6f 6e 65 20 69 6e |fore thi|s one in|
|00000a30| 20 61 6e 6f 74 68 65 72 | 20 77 69 6e 64 6f 77 2e | another| window.|
|00000a40| 0a 5c 5b 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 76 |.\[Buffe|r-menu-v|
|00000a50| 69 73 69 74 2d 74 61 67 | 73 2d 74 61 62 6c 65 5d |isit-tag|s-table]|
|00000a60| 20 2d 2d 20 76 69 73 69 | 74 2d 74 61 67 73 2d 74 | -- visi|t-tags-t|
|00000a70| 61 62 6c 65 20 74 68 69 | 73 20 62 75 66 66 65 72 |able thi|s buffer|
|00000a80| 2e 0a 5c 5b 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |..\[Buff|er-menu-|
|00000a90| 6e 6f 74 2d 6d 6f 64 69 | 66 69 65 64 5d 20 2d 2d |not-modi|fied] --|
|00000aa0| 20 63 6c 65 61 72 20 6d | 6f 64 69 66 69 65 64 2d | clear m|odified-|
|00000ab0| 66 6c 61 67 20 6f 6e 20 | 74 68 61 74 20 62 75 66 |flag on |that buf|
|00000ac0| 66 65 72 2e 0a 5c 5b 42 | 75 66 66 65 72 2d 6d 65 |fer..\[B|uffer-me|
|00000ad0| 6e 75 2d 73 61 76 65 5d | 20 2d 2d 20 6d 61 72 6b |nu-save]| -- mark|
|00000ae0| 20 74 68 61 74 20 62 75 | 66 66 65 72 20 74 6f 20 | that bu|ffer to |
|00000af0| 62 65 20 73 61 76 65 64 | 2c 20 61 6e 64 20 6d 6f |be saved|, and mo|
|00000b00| 76 65 20 64 6f 77 6e 2e | 0a 5c 5b 42 75 66 66 65 |ve down.|.\[Buffe|
|00000b10| 72 2d 6d 65 6e 75 2d 64 | 65 6c 65 74 65 5d 20 2d |r-menu-d|elete] -|
|00000b20| 2d 20 6d 61 72 6b 20 74 | 68 61 74 20 62 75 66 66 |- mark t|hat buff|
|00000b30| 65 72 20 74 6f 20 62 65 | 20 64 65 6c 65 74 65 64 |er to be| deleted|
|00000b40| 2c 20 61 6e 64 20 6d 6f | 76 65 20 64 6f 77 6e 2e |, and mo|ve down.|
|00000b50| 0a 5c 5b 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 64 |.\[Buffe|r-menu-d|
|00000b60| 65 6c 65 74 65 2d 62 61 | 63 6b 77 61 72 64 73 5d |elete-ba|ckwards]|
|00000b70| 20 2d 2d 20 6d 61 72 6b | 20 74 68 61 74 20 62 75 | -- mark| that bu|
|00000b80| 66 66 65 72 20 74 6f 20 | 62 65 20 64 65 6c 65 74 |ffer to |be delet|
|00000b90| 65 64 2c 20 61 6e 64 20 | 6d 6f 76 65 20 75 70 2e |ed, and |move up.|
|00000ba0| 0a 5c 5b 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 65 |.\[Buffe|r-menu-e|
|00000bb0| 78 65 63 75 74 65 5d 20 | 2d 2d 20 64 65 6c 65 74 |xecute] |-- delet|
|00000bc0| 65 20 6f 72 20 73 61 76 | 65 20 6d 61 72 6b 65 64 |e or sav|e marked|
|00000bd0| 20 62 75 66 66 65 72 73 | 2e 0a 5c 5b 42 75 66 66 | buffers|..\[Buff|
|00000be0| 65 72 2d 6d 65 6e 75 2d | 75 6e 6d 61 72 6b 5d 20 |er-menu-|unmark] |
|00000bf0| 2d 2d 20 72 65 6d 6f 76 | 65 20 61 6c 6c 20 6b 69 |-- remov|e all ki|
|00000c00| 6e 64 73 20 6f 66 20 6d | 61 72 6b 73 20 66 72 6f |nds of m|arks fro|
|00000c10| 6d 20 63 75 72 72 65 6e | 74 20 6c 69 6e 65 2e 0a |m curren|t line..|
|00000c20| 20 20 57 69 74 68 20 70 | 72 65 66 69 78 20 61 72 | With p|refix ar|
|00000c30| 67 75 6d 65 6e 74 2c 20 | 61 6c 73 6f 20 6d 6f 76 |gument, |also mov|
|00000c40| 65 20 75 70 20 6f 6e 65 | 20 6c 69 6e 65 2e 0a 5c |e up one| line..\|
|00000c50| 5b 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 62 61 63 |[Buffer-|menu-bac|
|00000c60| 6b 75 70 2d 75 6e 6d 61 | 72 6b 5d 20 2d 2d 20 62 |kup-unma|rk] -- b|
|00000c70| 61 63 6b 20 75 70 20 61 | 20 6c 69 6e 65 20 61 6e |ack up a| line an|
|00000c80| 64 20 72 65 6d 6f 76 65 | 20 6d 61 72 6b 73 2e 0a |d remove| marks..|
|00000c90| 5c 5b 42 75 66 66 65 72 | 2d 6d 65 6e 75 2d 74 6f |\[Buffer|-menu-to|
|00000ca0| 67 67 6c 65 2d 72 65 61 | 64 2d 6f 6e 6c 79 5d 20 |ggle-rea|d-only] |
|00000cb0| 2d 2d 20 74 6f 67 67 6c | 65 20 72 65 61 64 2d 6f |-- toggl|e read-o|
|00000cc0| 6e 6c 79 20 73 74 61 74 | 75 73 20 6f 66 20 62 75 |nly stat|us of bu|
|00000cd0| 66 66 65 72 20 6f 6e 20 | 74 68 69 73 20 6c 69 6e |ffer on |this lin|
|00000ce0| 65 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 42 |e...(def|alias 'B|
|00000cf0| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 6d 6f 64 65 20 |uffer-me|nu-mode |
|00000d00| 23 5b 6e 69 6c 20 22 c0 | 20 88 c1 5c 6e 21 88 c3 |#[nil ".| ..\n!..|
|00000d10| 14 c5 16 06 c7 c8 21 88 | c9 16 08 ca 16 0b ca 16 |......!.|........|
|00000d20| 0c c7 cd 21 88 ce cd cf | 5c 22 88 d0 d1 21 87 22 |...!....|\"...!."|
|00000d30| 20 5b 6b 69 6c 6c 2d 61 | 6c 6c 2d 6c 6f 63 61 6c | [kill-a|ll-local|
|00000d40| 2d 76 61 72 69 61 62 6c | 65 73 20 75 73 65 2d 6c |-variabl|es use-l|
|00000d50| 6f 63 61 6c 2d 6d 61 70 | 20 42 75 66 66 65 72 2d |ocal-map| Buffer-|
|00000d60| 6d 65 6e 75 2d 6d 6f 64 | 65 2d 6d 61 70 20 42 75 |menu-mod|e-map Bu|
|00000d70| 66 66 65 72 2d 6d 65 6e | 75 2d 6d 6f 64 65 20 6d |ffer-men|u-mode m|
|00000d80| 61 6a 6f 72 2d 6d 6f 64 | 65 20 22 42 75 66 66 65 |ajor-mod|e "Buffe|
|00000d90| 72 20 4d 65 6e 75 22 20 | 6d 6f 64 65 2d 6e 61 6d |r Menu" |mode-nam|
|00000da0| 65 20 6d 61 6b 65 2d 6c | 6f 63 61 6c 2d 76 61 72 |e make-l|ocal-var|
|00000db0| 69 61 62 6c 65 20 72 65 | 76 65 72 74 2d 62 75 66 |iable re|vert-buf|
|00000dc0| 66 65 72 2d 66 75 6e 63 | 74 69 6f 6e 20 42 75 66 |fer-func|tion Buf|
|00000dd0| 66 65 72 2d 6d 65 6e 75 | 2d 72 65 76 65 72 74 2d |fer-menu|-revert-|
|00000de0| 66 75 6e 63 74 69 6f 6e | 20 74 20 74 72 75 6e 63 |function| t trunc|
|00000df0| 61 74 65 2d 6c 69 6e 65 | 73 20 62 75 66 66 65 72 |ate-line|s buffer|
|00000e00| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 6d 6f 75 73 65 |-read-on|ly mouse|
|00000e10| 2d 74 72 61 63 6b 2d 63 | 6c 69 63 6b 2d 68 6f 6f |-track-c|lick-hoo|
|00000e20| 6b 20 61 64 64 2d 68 6f | 6f 6b 20 42 75 66 66 65 |k add-ho|ok Buffe|
|00000e30| 72 2d 6d 65 6e 75 2d 6d | 61 79 62 65 2d 6d 6f 75 |r-menu-m|aybe-mou|
|00000e40| 73 65 2d 73 65 6c 65 63 | 74 20 72 75 6e 2d 68 6f |se-selec|t run-ho|
|00000e50| 6f 6b 73 20 62 75 66 66 | 65 72 2d 6d 65 6e 75 2d |oks buff|er-menu-|
|00000e60| 6d 6f 64 65 2d 68 6f 6f | 6b 5d 20 33 20 28 23 24 |mode-hoo|k] 3 (#$|
|00000e70| 20 2e 20 31 36 39 34 29 | 5d 29 0a 28 64 65 66 61 | . 1694)|]).(defa|
|00000e80| 6c 69 61 73 20 27 42 75 | 66 66 65 72 2d 6d 65 6e |lias 'Bu|ffer-men|
|00000e90| 75 2d 72 65 76 65 72 74 | 2d 66 75 6e 63 74 69 6f |u-revert|-functio|
|00000ea0| 6e 20 23 5b 28 69 67 6e | 6f 72 65 31 20 69 67 6e |n #[(ign|ore1 ign|
|00000eb0| 6f 72 65 32 29 20 22 c0 | 20 87 22 20 5b 6c 69 73 |ore2) ".| ." [lis|
|00000ec0| 74 2d 62 75 66 66 65 72 | 73 5d 20 31 5d 29 0a 23 |t-buffer|s] 1]).#|
|00000ed0| 40 35 34 20 52 65 74 75 | 72 6e 20 62 75 66 66 65 |@54 Retu|rn buffe|
|00000ee0| 72 20 64 65 73 63 72 69 | 62 65 64 20 62 79 20 74 |r descri|bed by t|
|00000ef0| 68 69 73 20 6c 69 6e 65 | 20 6f 66 20 62 75 66 66 |his line| of buff|
|00000f00| 65 72 20 6d 65 6e 75 2e | 1f 0a 28 64 65 66 61 6c |er menu.|..(defal|
|00000f10| 69 61 73 20 27 42 75 66 | 66 65 72 2d 6d 65 6e 75 |ias 'Buf|fer-menu|
|00000f20| 2d 62 75 66 66 65 72 20 | 23 5b 28 65 72 72 6f 72 |-buffer |#[(error|
|00000f30| 2d 69 66 2d 6e 6f 6e 2d | 65 78 69 73 74 65 6e 74 |-if-non-|existent|
|00000f40| 2d 70 29 20 22 8a c0 79 | 88 60 09 5c 5c 29 1a 6d |-p) "..y|.`.\\).m|
|00000f50| 3f ad 84 c3 5c 6e c4 5c | 22 89 1d ab 8f c6 0d 21 |?...\n.\|"......!|
|00000f60| ae 91 0e 07 ad 8d c8 c9 | 0d 5c 22 aa 87 0e 07 ad |........|.\".....|
|00000f70| 83 c8 ca 21 2a 87 22 20 | 5b 30 20 42 75 66 66 65 |...!*." |[0 Buffe|
|00000f80| 72 2d 6d 65 6e 75 2d 62 | 75 66 66 65 72 2d 63 6f |r-menu-b|uffer-co|
|00000f90| 6c 75 6d 6e 20 77 68 65 | 72 65 20 67 65 74 2d 74 |lumn whe|re get-t|
|00000fa0| 65 78 74 2d 70 72 6f 70 | 65 72 74 79 20 62 75 66 |ext-prop|erty buf|
|00000fb0| 66 65 72 2d 6e 61 6d 65 | 20 6e 61 6d 65 20 67 65 |fer-name| name ge|
|00000fc0| 74 2d 62 75 66 66 65 72 | 20 65 72 72 6f 72 2d 69 |t-buffer| error-i|
|00000fd0| 66 2d 6e 6f 6e 2d 65 78 | 69 73 74 65 6e 74 2d 70 |f-non-ex|istent-p|
|00000fe0| 20 65 72 72 6f 72 20 22 | 4e 6f 20 62 75 66 66 65 | error "|No buffe|
|00000ff0| 72 20 6e 61 6d 65 64 20 | 60 25 73 27 22 20 22 4e |r named |`%s'" "N|
|00001000| 6f 20 62 75 66 66 65 72 | 20 6f 6e 20 74 68 69 73 |o buffer| on this|
|00001010| 20 6c 69 6e 65 22 5d 20 | 34 20 28 23 24 20 2e 20 | line"] |4 (#$ . |
|00001020| 33 37 39 36 29 5d 29 0a | 23 40 32 33 33 20 4d 61 |3796)]).|#@233 Ma|
|00001030| 6b 65 20 61 20 6d 65 6e | 75 20 6f 66 20 62 75 66 |ke a men|u of buf|
|00001040| 66 65 72 73 20 73 6f 20 | 79 6f 75 20 63 61 6e 20 |fers so |you can |
|00001050| 73 61 76 65 2c 20 64 65 | 6c 65 74 65 20 6f 72 20 |save, de|lete or |
|00001060| 73 65 6c 65 63 74 20 74 | 68 65 6d 2e 0a 57 69 74 |select t|hem..Wit|
|00001070| 68 20 61 72 67 75 6d 65 | 6e 74 2c 20 73 68 6f 77 |h argume|nt, show|
|00001080| 20 6f 6e 6c 79 20 62 75 | 66 66 65 72 73 20 74 68 | only bu|ffers th|
|00001090| 61 74 20 61 72 65 20 76 | 69 73 69 74 69 6e 67 20 |at are v|isiting |
|000010a0| 66 69 6c 65 73 2e 0a 54 | 79 70 65 20 3f 20 61 66 |files..T|ype ? af|
|000010b0| 74 65 72 20 69 6e 76 6f | 63 61 74 69 6f 6e 20 74 |ter invo|cation t|
|000010c0| 6f 20 67 65 74 20 68 65 | 6c 70 20 6f 6e 20 63 6f |o get he|lp on co|
|000010d0| 6d 6d 61 6e 64 73 20 61 | 76 61 69 6c 61 62 6c 65 |mmands a|vailable|
|000010e0| 2e 0a 54 79 70 65 20 71 | 20 69 6d 6d 65 64 69 61 |..Type q| immedia|
|000010f0| 74 65 6c 79 20 74 6f 20 | 6d 61 6b 65 20 74 68 65 |tely to |make the|
|00001100| 20 62 75 66 66 65 72 20 | 6d 65 6e 75 20 67 6f 20 | buffer |menu go |
|00001110| 61 77 61 79 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |away...(|defalias|
|00001120| 20 27 62 75 66 66 65 72 | 2d 6d 65 6e 75 20 23 5b | 'buffer|-menu #[|
|00001130| 28 26 6f 70 74 69 6f 6e | 61 6c 20 61 72 67 29 20 |(&option|al arg) |
|00001140| 22 c0 c1 5c 6e 21 21 88 | c3 c4 21 87 22 20 5b 73 |"..\n!!.|..!." [s|
|00001150| 77 69 74 63 68 2d 74 6f | 2d 62 75 66 66 65 72 20 |witch-to|-buffer |
|00001160| 6c 69 73 74 2d 62 75 66 | 66 65 72 73 2d 6e 6f 73 |list-buf|fers-nos|
|00001170| 65 6c 65 63 74 20 61 72 | 67 20 6d 65 73 73 61 67 |elect ar|g messag|
|00001180| 65 20 22 43 6f 6d 6d 61 | 6e 64 73 3a 20 64 2c 20 |e "Comma|nds: d, |
|00001190| 73 2c 20 78 2c 20 75 3b | 20 66 2c 20 6f 2c 20 31 |s, x, u;| f, o, 1|
|000011a0| 2c 20 32 2c 20 6d 2c 20 | 76 3b 20 7e 2c 20 25 25 |, 2, m, |v; ~, %%|
|000011b0| 3b 20 71 20 74 6f 20 71 | 75 69 74 3b 20 3f 20 66 |; q to q|uit; ? f|
|000011c0| 6f 72 20 68 65 6c 70 2e | 22 5d 20 33 20 28 23 24 |or help.|"] 3 (#$|
|000011d0| 20 2e 20 34 31 34 32 29 | 20 22 50 22 5d 29 0a 23 | . 4142)| "P"]).#|
|000011e0| 40 32 38 38 20 44 69 73 | 70 6c 61 79 20 61 20 6c |@288 Dis|play a l|
|000011f0| 69 73 74 20 6f 66 20 62 | 75 66 66 65 72 73 20 69 |ist of b|uffers i|
|00001200| 6e 20 61 6e 6f 74 68 65 | 72 20 77 69 6e 64 6f 77 |n anothe|r window|
|00001210| 2e 0a 57 69 74 68 20 74 | 68 65 20 62 75 66 66 65 |..With t|he buffe|
|00001220| 72 20 6c 69 73 74 20 62 | 75 66 66 65 72 2c 20 79 |r list b|uffer, y|
|00001230| 6f 75 20 63 61 6e 20 73 | 61 76 65 2c 20 64 65 6c |ou can s|ave, del|
|00001240| 65 74 65 20 6f 72 20 73 | 65 6c 65 63 74 20 74 68 |ete or s|elect th|
|00001250| 65 20 62 75 66 66 65 72 | 73 2e 0a 57 69 74 68 20 |e buffer|s..With |
|00001260| 61 72 67 75 6d 65 6e 74 | 2c 20 73 68 6f 77 20 6f |argument|, show o|
|00001270| 6e 6c 79 20 62 75 66 66 | 65 72 73 20 74 68 61 74 |nly buff|ers that|
|00001280| 20 61 72 65 20 76 69 73 | 69 74 69 6e 67 20 66 69 | are vis|iting fi|
|00001290| 6c 65 73 2e 0a 54 79 70 | 65 20 3f 20 61 66 74 65 |les..Typ|e ? afte|
|000012a0| 72 20 69 6e 76 6f 63 61 | 74 69 6f 6e 20 74 6f 20 |r invoca|tion to |
|000012b0| 67 65 74 20 68 65 6c 70 | 20 6f 6e 20 63 6f 6d 6d |get help| on comm|
|000012c0| 61 6e 64 73 20 61 76 61 | 69 6c 61 62 6c 65 2e 0a |ands ava|ilable..|
|000012d0| 54 79 70 65 20 71 20 69 | 6d 6d 65 64 69 61 74 65 |Type q i|mmediate|
|000012e0| 6c 79 20 74 6f 20 6d 61 | 6b 65 20 74 68 65 20 62 |ly to ma|ke the b|
|000012f0| 75 66 66 65 72 20 6d 65 | 6e 75 20 67 6f 20 61 77 |uffer me|nu go aw|
|00001300| 61 79 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |ay...(de|falias '|
|00001310| 62 75 66 66 65 72 2d 6d | 65 6e 75 2d 6f 74 68 65 |buffer-m|enu-othe|
|00001320| 72 2d 77 69 6e 64 6f 77 | 20 23 5b 28 26 6f 70 74 |r-window| #[(&opt|
|00001330| 69 6f 6e 61 6c 20 61 72 | 67 29 20 22 c0 c1 5c 6e |ional ar|g) "..\n|
|00001340| 21 21 88 c3 c4 21 87 22 | 20 5b 73 77 69 74 63 68 |!!...!."| [switch|
|00001350| 2d 74 6f 2d 62 75 66 66 | 65 72 2d 6f 74 68 65 72 |-to-buff|er-other|
|00001360| 2d 77 69 6e 64 6f 77 20 | 6c 69 73 74 2d 62 75 66 |-window |list-buf|
|00001370| 66 65 72 73 2d 6e 6f 73 | 65 6c 65 63 74 20 61 72 |fers-nos|elect ar|
|00001380| 67 20 6d 65 73 73 61 67 | 65 20 22 43 6f 6d 6d 61 |g messag|e "Comma|
|00001390| 6e 64 73 3a 20 64 2c 20 | 73 2c 20 78 2c 20 75 3b |nds: d, |s, x, u;|
|000013a0| 20 66 2c 20 6f 2c 20 31 | 2c 20 32 2c 20 6d 2c 20 | f, o, 1|, 2, m, |
|000013b0| 76 3b 20 7e 2c 20 25 25 | 3b 20 71 20 74 6f 20 71 |v; ~, %%|; q to q|
|000013c0| 75 69 74 3b 20 3f 20 66 | 6f 72 20 68 65 6c 70 2e |uit; ? f|or help.|
|000013d0| 22 5d 20 33 20 28 23 24 | 20 2e 20 34 35 38 31 29 |"] 3 (#$| . 4581)|
|000013e0| 20 22 50 22 5d 29 0a 23 | 40 32 33 20 51 75 69 74 | "P"]).#|@23 Quit|
|000013f0| 20 74 68 65 20 62 75 66 | 66 65 72 20 6d 65 6e 75 | the buf|fer menu|
|00001400| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 42 75 |...(defa|lias 'Bu|
|00001410| 66 66 65 72 2d 6d 65 6e | 75 2d 71 75 69 74 20 23 |ffer-men|u-quit #|
|00001420| 5b 6e 69 6c 20 22 70 18 | c1 c2 20 21 88 c3 08 21 |[nil "p.|.. !...!|
|00001430| 29 87 22 20 5b 62 75 66 | 66 65 72 20 73 77 69 74 |)." [buf|fer swit|
|00001440| 63 68 2d 74 6f 2d 62 75 | 66 66 65 72 20 6f 74 68 |ch-to-bu|ffer oth|
|00001450| 65 72 2d 62 75 66 66 65 | 72 20 62 75 72 79 2d 62 |er-buffe|r bury-b|
|00001460| 75 66 66 65 72 5d 20 32 | 20 28 23 24 20 2e 20 35 |uffer] 2| (#$ . 5|
|00001470| 31 30 30 29 20 6e 69 6c | 5d 29 0a 23 40 31 30 33 |100) nil|]).#@103|
|00001480| 20 4d 61 72 6b 20 62 75 | 66 66 65 72 20 6f 6e 20 | Mark bu|ffer on |
|00001490| 74 68 69 73 20 6c 69 6e | 65 20 66 6f 72 20 62 65 |this lin|e for be|
|000014a0| 69 6e 67 20 64 69 73 70 | 6c 61 79 65 64 20 62 79 |ing disp|layed by|
|000014b0| 20 5c 3c 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 6d | \<Buffe|r-menu-m|
|000014c0| 6f 64 65 2d 6d 61 70 3e | 5c 5b 42 75 66 66 65 72 |ode-map>|\[Buffer|
|000014d0| 2d 6d 65 6e 75 2d 73 65 | 6c 65 63 74 5d 20 63 6f |-menu-se|lect] co|
|000014e0| 6d 6d 61 6e 64 2e 1f 0a | 28 64 65 66 61 6c 69 61 |mmand...|(defalia|
|000014f0| 73 20 27 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 6d |s 'Buffe|r-menu-m|
|00001500| 61 72 6b 20 23 5b 6e 69 | 6c 20 22 c0 79 88 c1 c2 |ark #[ni|l ".y...|
|00001510| 21 ab 83 c3 20 87 c4 1d | c6 c7 21 88 c8 63 88 c7 |!... ...|..!..c..|
|00001520| 79 29 87 22 20 5b 30 20 | 6c 6f 6f 6b 69 6e 67 2d |y)." [0 |looking-|
|00001530| 61 74 20 22 20 5b 2d 4d | 5d 22 20 64 69 6e 67 20 |at " [-M|]" ding |
|00001540| 6e 69 6c 20 62 75 66 66 | 65 72 2d 72 65 61 64 2d |nil buff|er-read-|
|00001550| 6f 6e 6c 79 20 64 65 6c | 65 74 65 2d 63 68 61 72 |only del|ete-char|
|00001560| 20 31 20 3f 5c 3e 5d 20 | 32 20 28 23 24 20 2e 20 | 1 ?\>] |2 (#$ . |
|00001570| 35 32 34 39 29 20 6e 69 | 6c 5d 29 0a 23 40 39 39 |5249) ni|l]).#@99|
|00001580| 20 43 61 6e 63 65 6c 20 | 61 6c 6c 20 72 65 71 75 | Cancel |all requ|
|00001590| 65 73 74 65 64 20 6f 70 | 65 72 61 74 69 6f 6e 73 |ested op|erations|
|000015a0| 20 6f 6e 20 62 75 66 66 | 65 72 20 6f 6e 20 74 68 | on buff|er on th|
|000015b0| 69 73 20 6c 69 6e 65 20 | 61 6e 64 20 6d 6f 76 65 |is line |and move|
|000015c0| 20 64 6f 77 6e 2e 0a 4f | 70 74 69 6f 6e 61 6c 20 | down..O|ptional |
|000015d0| 41 52 47 20 6d 65 61 6e | 73 20 6d 6f 76 65 20 75 |ARG mean|s move u|
|000015e0| 70 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 42 |p...(def|alias 'B|
|000015f0| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 75 6e 6d 61 72 |uffer-me|nu-unmar|
|00001600| 6b 20 23 5b 28 26 6f 70 | 74 69 6f 6e 61 6c 20 62 |k #[(&op|tional b|
|00001610| 61 63 6b 75 70 29 20 22 | c0 79 88 c1 c2 21 ab 85 |ackup) "|.y...!..|
|00001620| c3 20 88 aa b5 c4 c5 21 | 1e 06 c7 0e 06 21 1e 08 |. .....!|.....!..|
|00001630| 8a 0e 06 71 88 0e 09 29 | 1e 5c 6e cb 1e 09 cc cd |...q...)|.\n.....|
|00001640| 21 88 0e 5c 6e ab 8a 0e | 08 ab 83 ce aa 8b cf aa |!..\n...|........|
|00001650| 88 0e 08 ab 83 d0 aa 81 | d1 63 88 2c 0e 12 ab 83 |........|.c.,....|
|00001660| d3 aa 81 d4 79 87 22 20 | 5b 30 20 6c 6f 6f 6b 69 |....y." |[0 looki|
|00001670| 6e 67 2d 61 74 20 22 20 | 5b 2d 4d 5d 22 20 64 69 |ng-at " |[-M]" di|
|00001680| 6e 67 20 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 62 |ng Buffe|r-menu-b|
|00001690| 75 66 66 65 72 20 74 20 | 62 75 66 20 62 75 66 66 |uffer t |buf buff|
|000016a0| 65 72 2d 6d 6f 64 69 66 | 69 65 64 2d 70 20 6d 6f |er-modif|ied-p mo|
|000016b0| 64 20 62 75 66 66 65 72 | 2d 72 65 61 64 2d 6f 6e |d buffer|-read-on|
|000016c0| 6c 79 20 72 65 61 64 6f | 6e 6c 79 20 6e 69 6c 20 |ly reado|nly nil |
|000016d0| 64 65 6c 65 74 65 2d 63 | 68 61 72 20 33 20 22 20 |delete-c|har 3 " |
|000016e0| 2a 25 22 20 22 20 20 25 | 22 20 22 20 2a 20 22 20 |*%" " %|" " * " |
|000016f0| 22 20 20 20 22 20 62 61 | 63 6b 75 70 20 2d 31 20 |" " ba|ckup -1 |
|00001700| 31 5d 20 32 20 28 23 24 | 20 2e 20 35 35 30 35 29 |1] 2 (#$| . 5505)|
|00001710| 20 22 50 22 5d 29 0a 23 | 40 37 30 20 4d 6f 76 65 | "P"]).#|@70 Move|
|00001720| 20 75 70 20 61 6e 64 20 | 63 61 6e 63 65 6c 20 61 | up and |cancel a|
|00001730| 6c 6c 20 72 65 71 75 65 | 73 74 65 64 20 6f 70 65 |ll reque|sted ope|
|00001740| 72 61 74 69 6f 6e 73 20 | 6f 6e 20 62 75 66 66 65 |rations |on buffe|
|00001750| 72 20 6f 6e 20 6c 69 6e | 65 20 61 62 6f 76 65 2e |r on lin|e above.|
|00001760| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 42 75 66 |..(defal|ias 'Buf|
|00001770| 66 65 72 2d 6d 65 6e 75 | 2d 62 61 63 6b 75 70 2d |fer-menu|-backup-|
|00001780| 75 6e 6d 61 72 6b 20 23 | 5b 6e 69 6c 20 22 c0 79 |unmark #|[nil ".y|
|00001790| 88 c1 20 88 c0 79 87 22 | 20 5b 2d 31 20 42 75 66 |.. ..y."| [-1 Buf|
|000017a0| 66 65 72 2d 6d 65 6e 75 | 2d 75 6e 6d 61 72 6b 5d |fer-menu|-unmark]|
|000017b0| 20 31 20 28 23 24 20 2e | 20 35 39 31 36 29 20 6e | 1 (#$ .| 5916) n|
|000017c0| 69 6c 5d 29 0a 23 40 31 | 37 37 20 4d 61 72 6b 20 |il]).#@1|77 Mark |
|000017d0| 62 75 66 66 65 72 20 6f | 6e 20 74 68 69 73 20 6c |buffer o|n this l|
|000017e0| 69 6e 65 20 74 6f 20 62 | 65 20 64 65 6c 65 74 65 |ine to b|e delete|
|000017f0| 64 20 62 79 20 5c 3c 42 | 75 66 66 65 72 2d 6d 65 |d by \<B|uffer-me|
|00001800| 6e 75 2d 6d 6f 64 65 2d | 6d 61 70 3e 5c 5b 42 75 |nu-mode-|map>\[Bu|
|00001810| 66 66 65 72 2d 6d 65 6e | 75 2d 65 78 65 63 75 74 |ffer-men|u-execut|
|00001820| 65 5d 20 63 6f 6d 6d 61 | 6e 64 2e 0a 50 72 65 66 |e] comma|nd..Pref|
|00001830| 69 78 20 61 72 67 20 69 | 73 20 68 6f 77 20 6d 61 |ix arg i|s how ma|
|00001840| 6e 79 20 62 75 66 66 65 | 72 73 20 74 6f 20 64 65 |ny buffe|rs to de|
|00001850| 6c 65 74 65 2e 0a 4e 65 | 67 61 74 69 76 65 20 61 |lete..Ne|gative a|
|00001860| 72 67 20 6d 65 61 6e 73 | 20 64 65 6c 65 74 65 20 |rg means| delete |
|00001870| 62 61 63 6b 77 61 72 64 | 73 2e 1f 0a 28 64 65 66 |backward|s...(def|
|00001880| 61 6c 69 61 73 20 27 42 | 75 66 66 65 72 2d 6d 65 |alias 'B|uffer-me|
|00001890| 6e 75 2d 64 65 6c 65 74 | 65 20 23 5b 28 26 6f 70 |nu-delet|e #[(&op|
|000018a0| 74 69 6f 6e 61 6c 20 61 | 72 67 29 20 22 c0 79 88 |tional a|rg) ".y.|
|000018b0| c1 c2 21 ab 83 c3 20 87 | c4 1d 0e 06 ab 86 0e 06 |..!... .|........|
|000018c0| c0 55 ab 83 c7 16 06 0e | 06 c0 56 ab 92 c8 c7 21 |.U......|..V....!|
|000018d0| 88 c9 63 88 c7 79 88 0e | 06 53 89 16 06 aa 6a 0e |..c..y..|.S....j.|
|000018e0| 06 c0 57 ad 92 c8 c7 21 | 88 c9 63 88 ca 79 88 0e |..W....!|..c..y..|
|000018f0| 06 54 89 16 06 aa 6a 29 | 87 22 20 5b 30 20 6c 6f |.T....j)|." [0 lo|
|00001900| 6f 6b 69 6e 67 2d 61 74 | 20 22 20 5b 2d 4d 5d 22 |oking-at| " [-M]"|
|00001910| 20 64 69 6e 67 20 6e 69 | 6c 20 62 75 66 66 65 72 | ding ni|l buffer|
|00001920| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 61 72 67 20 31 |-read-on|ly arg 1|
|00001930| 20 64 65 6c 65 74 65 2d | 63 68 61 72 20 3f 44 20 | delete-|char ?D |
|00001940| 2d 31 5d 20 33 20 28 23 | 24 20 2e 20 36 30 39 31 |-1] 3 (#|$ . 6091|
|00001950| 29 20 22 70 22 5d 29 0a | 23 40 31 36 34 20 4d 61 |) "p"]).|#@164 Ma|
|00001960| 72 6b 20 62 75 66 66 65 | 72 20 6f 6e 20 74 68 69 |rk buffe|r on thi|
|00001970| 73 20 6c 69 6e 65 20 74 | 6f 20 62 65 20 64 65 6c |s line t|o be del|
|00001980| 65 74 65 64 20 62 79 20 | 5c 3c 42 75 66 66 65 72 |eted by |\<Buffer|
|00001990| 2d 6d 65 6e 75 2d 6d 6f | 64 65 2d 6d 61 70 3e 5c |-menu-mo|de-map>\|
|000019a0| 5b 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 65 78 65 |[Buffer-|menu-exe|
|000019b0| 63 75 74 65 5d 20 63 6f | 6d 6d 61 6e 64 0a 61 6e |cute] co|mmand.an|
|000019c0| 64 20 74 68 65 6e 20 6d | 6f 76 65 20 75 70 20 6f |d then m|ove up o|
|000019d0| 6e 65 20 6c 69 6e 65 2e | 20 20 50 72 65 66 69 78 |ne line.| Prefix|
|000019e0| 20 61 72 67 20 6d 65 61 | 6e 73 20 6d 6f 76 65 20 | arg mea|ns move |
|000019f0| 74 68 61 74 20 6d 61 6e | 79 20 6c 69 6e 65 73 2e |that man|y lines.|
|00001a00| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 42 75 66 |..(defal|ias 'Buf|
|00001a10| 66 65 72 2d 6d 65 6e 75 | 2d 64 65 6c 65 74 65 2d |fer-menu|-delete-|
|00001a20| 62 61 63 6b 77 61 72 64 | 73 20 23 5b 28 26 6f 70 |backward|s #[(&op|
|00001a30| 74 69 6f 6e 61 6c 20 61 | 72 67 29 20 22 c0 09 ae |tional a|rg) "...|
|00001a40| 81 c2 5b 21 88 c3 c4 21 | ad 85 c2 79 88 aa 76 87 |..[!...!|...y..v.|
|00001a50| 22 20 5b 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 64 |" [Buffe|r-menu-d|
|00001a60| 65 6c 65 74 65 20 61 72 | 67 20 31 20 6c 6f 6f 6b |elete ar|g 1 look|
|00001a70| 69 6e 67 2d 61 74 20 22 | 20 5b 2d 4d 5d 22 5d 20 |ing-at "| [-M]"] |
|00001a80| 32 20 28 23 24 20 2e 20 | 36 34 39 34 29 20 22 70 |2 (#$ . |6494) "p|
|00001a90| 22 5d 29 0a 23 40 39 36 | 20 4d 61 72 6b 20 62 75 |"]).#@96| Mark bu|
|00001aa0| 66 66 65 72 20 6f 6e 20 | 74 68 69 73 20 6c 69 6e |ffer on |this lin|
|00001ab0| 65 20 74 6f 20 62 65 20 | 73 61 76 65 64 20 62 79 |e to be |saved by|
|00001ac0| 20 5c 3c 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 6d | \<Buffe|r-menu-m|
|00001ad0| 6f 64 65 2d 6d 61 70 3e | 5c 5b 42 75 66 66 65 72 |ode-map>|\[Buffer|
|00001ae0| 2d 6d 65 6e 75 2d 65 78 | 65 63 75 74 65 5d 20 63 |-menu-ex|ecute] c|
|00001af0| 6f 6d 6d 61 6e 64 2e 1f | 0a 28 64 65 66 61 6c 69 |ommand..|.(defali|
|00001b00| 61 73 20 27 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |as 'Buff|er-menu-|
|00001b10| 73 61 76 65 20 23 5b 6e | 69 6c 20 22 c0 79 88 c1 |save #[n|il ".y..|
|00001b20| c2 21 ab 83 c3 20 87 c4 | 1d c6 75 88 c7 c6 21 88 |.!... ..|..u...!.|
|00001b30| c8 63 88 c6 79 29 87 22 | 20 5b 30 20 6c 6f 6f 6b |.c..y)."| [0 look|
|00001b40| 69 6e 67 2d 61 74 20 22 | 20 5b 2d 4d 5d 22 20 64 |ing-at "| [-M]" d|
|00001b50| 69 6e 67 20 6e 69 6c 20 | 62 75 66 66 65 72 2d 72 |ing nil |buffer-r|
|00001b60| 65 61 64 2d 6f 6e 6c 79 | 20 31 20 64 65 6c 65 74 |ead-only| 1 delet|
|00001b70| 65 2d 63 68 61 72 20 3f | 53 5d 20 32 20 28 23 24 |e-char ?|S] 2 (#$|
|00001b80| 20 2e 20 36 38 30 39 29 | 20 6e 69 6c 5d 29 0a 23 | . 6809)| nil]).#|
|00001b90| 40 36 32 20 4d 61 72 6b | 20 62 75 66 66 65 72 20 |@62 Mark| buffer |
|00001ba0| 6f 6e 20 74 68 69 73 20 | 6c 69 6e 65 20 61 73 20 |on this |line as |
|00001bb0| 75 6e 6d 6f 64 69 66 69 | 65 64 20 28 6e 6f 20 63 |unmodifi|ed (no c|
|00001bc0| 68 61 6e 67 65 73 20 74 | 6f 20 73 61 76 65 29 2e |hanges t|o save).|
|00001bd0| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 42 75 66 |..(defal|ias 'Buf|
|00001be0| 66 65 72 2d 6d 65 6e 75 | 2d 6e 6f 74 2d 6d 6f 64 |fer-menu|-not-mod|
|00001bf0| 69 66 69 65 64 20 23 5b | 28 26 6f 70 74 69 6f 6e |ified #[|(&option|
|00001c00| 61 6c 20 61 72 67 29 20 | 22 8a c0 c1 21 71 88 c2 |al arg) |"...!q..|
|00001c10| 0b 21 88 29 8a c4 79 88 | c5 75 88 60 66 0b ab 83 |.!.)..y.|.u.`f...|
|00001c20| c6 aa 81 c7 55 ad 90 c8 | 1e 09 ca c5 21 88 0b ab |....U...|....!...|
|00001c30| 83 c7 aa 81 c6 63 29 29 | 87 22 20 5b 42 75 66 66 |.....c))|." [Buff|
|00001c40| 65 72 2d 6d 65 6e 75 2d | 62 75 66 66 65 72 20 74 |er-menu-|buffer t|
|00001c50| 20 73 65 74 2d 62 75 66 | 66 65 72 2d 6d 6f 64 69 | set-buf|fer-modi|
|00001c60| 66 69 65 64 2d 70 20 61 | 72 67 20 30 20 31 20 3f |fied-p a|rg 0 1 ?|
|00001c70| 5c 20 20 3f 5c 2a 20 6e | 69 6c 20 62 75 66 66 65 |\ ?\* n|il buffe|
|00001c80| 72 2d 72 65 61 64 2d 6f | 6e 6c 79 20 64 65 6c 65 |r-read-o|nly dele|
|00001c90| 74 65 2d 63 68 61 72 5d | 20 32 20 28 23 24 20 2e |te-char]| 2 (#$ .|
|00001ca0| 20 37 30 36 30 29 20 22 | 50 22 5d 29 0a 23 40 31 | 7060) "|P"]).#@1|
|00001cb0| 34 31 20 53 61 76 65 20 | 61 6e 64 2f 6f 72 20 64 |41 Save |and/or d|
|00001cc0| 65 6c 65 74 65 20 62 75 | 66 66 65 72 73 20 6d 61 |elete bu|ffers ma|
|00001cd0| 72 6b 65 64 20 77 69 74 | 68 20 5c 3c 42 75 66 66 |rked wit|h \<Buff|
|00001ce0| 65 72 2d 6d 65 6e 75 2d | 6d 6f 64 65 2d 6d 61 70 |er-menu-|mode-map|
|00001cf0| 3e 5c 5b 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 73 |>\[Buffe|r-menu-s|
|00001d00| 61 76 65 5d 20 6f 72 20 | 5c 3c 42 75 66 66 65 72 |ave] or |\<Buffer|
|00001d10| 2d 6d 65 6e 75 2d 6d 6f | 64 65 2d 6d 61 70 3e 5c |-menu-mo|de-map>\|
|00001d20| 5b 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 64 65 6c |[Buffer-|menu-del|
|00001d30| 65 74 65 5d 20 63 6f 6d | 6d 61 6e 64 73 2e 1f 0a |ete] com|mands...|
|00001d40| 28 64 65 66 61 6c 69 61 | 73 20 27 42 75 66 66 65 |(defalia|s 'Buffe|
|00001d50| 72 2d 6d 65 6e 75 2d 65 | 78 65 63 75 74 65 20 23 |r-menu-e|xecute #|
|00001d60| 5b 6e 69 6c 20 22 8a 65 | 62 88 c0 79 88 c1 c2 c3 |[nil ".e|b..y....|
|00001d70| c4 23 ab a2 c3 1d 8a c6 | c4 21 71 88 c7 20 88 c8 |.#......|.!q.. ..|
|00001d80| 20 15 29 c3 1e 09 ca cb | 21 88 0d ab 83 cc aa 81 | .).....|!.......|
|00001d90| cd 63 88 2a aa 57 29 8a | 65 62 88 c0 79 88 70 c3 |.c.*.W).|eb..y.p.|
|00001da0| 1e 09 1e 0e cf d0 c3 c4 | 23 ad b6 cb 75 88 c6 c3 |........|#...u...|
|00001db0| 21 89 1e 11 c3 61 ac 8e | 0e 11 0e 0e 61 ac 87 8a |!....a..|....a...|
|00001dc0| d2 0e 11 21 88 29 29 c6 | c3 21 ab 89 ca c0 21 88 |...!.)).|.!....!.|
|00001dd0| cd 63 88 aa 4f 60 c0 79 | 88 60 7c 88 cb 75 88 aa |.c..O`.y|.`|..u..|
|00001de0| 43 2b 87 22 20 5b 31 20 | 72 65 2d 73 65 61 72 63 |C+." [1 |re-searc|
|00001df0| 68 2d 66 6f 72 77 61 72 | 64 20 22 5e 2e 53 22 20 |h-forwar|d "^.S" |
|00001e00| 6e 69 6c 20 74 20 6d 6f | 64 70 20 42 75 66 66 65 |nil t mo|dp Buffe|
|00001e10| 72 2d 6d 65 6e 75 2d 62 | 75 66 66 65 72 20 73 61 |r-menu-b|uffer sa|
|00001e20| 76 65 2d 62 75 66 66 65 | 72 20 62 75 66 66 65 72 |ve-buffe|r buffer|
|00001e30| 2d 6d 6f 64 69 66 69 65 | 64 2d 70 20 62 75 66 66 |-modifie|d-p buff|
|00001e40| 65 72 2d 72 65 61 64 2d | 6f 6e 6c 79 20 64 65 6c |er-read-|only del|
|00001e50| 65 74 65 2d 63 68 61 72 | 20 2d 31 20 3f 5c 2a 20 |ete-char| -1 ?\* |
|00001e60| 3f 5c 20 20 62 75 66 66 | 2d 6d 65 6e 75 2d 62 75 |?\ buff|-menu-bu|
|00001e70| 66 66 65 72 20 73 65 61 | 72 63 68 2d 66 6f 72 77 |ffer sea|rch-forw|
|00001e80| 61 72 64 20 22 5c 6e 44 | 22 20 62 75 66 20 6b 69 |ard "\nD|" buf ki|
|00001e90| 6c 6c 2d 62 75 66 66 65 | 72 5d 20 35 20 28 23 24 |ll-buffe|r] 5 (#$|
|00001ea0| 20 2e 20 37 33 34 37 29 | 20 6e 69 6c 5d 29 0a 23 | . 7347)| nil]).#|
|00001eb0| 40 32 34 31 20 53 65 6c | 65 63 74 20 74 68 69 73 |@241 Sel|ect this|
|00001ec0| 20 6c 69 6e 65 27 73 20 | 62 75 66 66 65 72 3b 20 | line's |buffer; |
|00001ed0| 61 6c 73 6f 20 64 69 73 | 70 6c 61 79 20 62 75 66 |also dis|play buf|
|00001ee0| 66 65 72 73 20 6d 61 72 | 6b 65 64 20 77 69 74 68 |fers mar|ked with|
|00001ef0| 20 60 3e 27 2e 0a 59 6f | 75 20 63 61 6e 20 6d 61 | `>'..Yo|u can ma|
|00001f00| 72 6b 20 62 75 66 66 65 | 72 73 20 77 69 74 68 20 |rk buffe|rs with |
|00001f10| 74 68 65 20 5c 3c 42 75 | 66 66 65 72 2d 6d 65 6e |the \<Bu|ffer-men|
|00001f20| 75 2d 6d 6f 64 65 2d 6d | 61 70 3e 5c 5b 42 75 66 |u-mode-m|ap>\[Buf|
|00001f30| 66 65 72 2d 6d 65 6e 75 | 2d 6d 61 72 6b 5d 20 63 |fer-menu|-mark] c|
|00001f40| 6f 6d 6d 61 6e 64 2e 0a | 54 68 69 73 20 63 6f 6d |ommand..|This com|
|00001f50| 6d 61 6e 64 20 64 65 6c | 65 74 65 73 20 61 6e 64 |mand del|etes and|
|00001f60| 20 72 65 70 6c 61 63 65 | 73 20 61 6c 6c 20 74 68 | replace|s all th|
|00001f70| 65 20 70 72 65 76 69 6f | 75 73 6c 79 20 65 78 69 |e previo|usly exi|
|00001f80| 73 74 69 6e 67 20 77 69 | 6e 64 6f 77 73 0a 69 6e |sting wi|ndows.in|
|00001f90| 20 74 68 65 20 73 65 6c | 65 63 74 65 64 20 66 72 | the sel|ected fr|
|00001fa0| 61 6d 65 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |ame...(d|efalias |
|00001fb0| 27 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 73 65 6c |'Buffer-|menu-sel|
|00001fc0| 65 63 74 20 23 5b 6e 69 | 6c 20 22 c0 c1 21 70 c2 |ect #[ni|l "..!p.|
|00001fd0| 89 1b 1c 1d 1e 06 65 62 | 88 c7 c8 c2 c1 23 ab a0 |......eb|.....#..|
|00001fe0| c0 c1 21 13 c2 1e 09 ca | cb 21 88 cc 63 88 29 0b |..!.....|.!..c.).|
|00001ff0| 0e 06 61 ac 64 0b 0c 73 | ac 5f 0b 0c 42 14 aa 59 |..a.d..s|._..B..Y|
|00002000| 0c 9f 14 cd 20 53 0c 47 | 54 a5 13 ce 20 88 cf 0e |.... S.G|T... ...|
|00002010| 06 21 88 0d 0e 06 61 ac | 84 d0 0d 21 88 0c 47 d1 |.!....a.|...!..G.|
|00002020| 6b ab 86 cf 0e 06 21 aa | 9a 0c ab 94 d2 c2 0b 5c |k.....!.|.......\|
|00002030| 22 88 d3 d4 21 88 cf 0c | 40 21 88 0c 41 89 14 ac |"...!...|@!..A...|
|00002040| 6c d3 d4 21 2c 87 22 20 | 5b 42 75 66 66 65 72 2d |l..!,." |[Buffer-|
|00002050| 6d 65 6e 75 2d 62 75 66 | 66 65 72 20 74 20 6e 69 |menu-buf|fer t ni|
|00002060| 6c 20 74 65 6d 20 6f 74 | 68 65 72 73 20 6d 65 6e |l tem ot|hers men|
|00002070| 75 20 62 75 66 66 20 73 | 65 61 72 63 68 2d 66 6f |u buff s|earch-fo|
|00002080| 72 77 61 72 64 20 22 5c | 6e 3e 22 20 62 75 66 66 |rward "\|n>" buff|
|00002090| 65 72 2d 72 65 61 64 2d | 6f 6e 6c 79 20 64 65 6c |er-read-|only del|
|000020a0| 65 74 65 2d 63 68 61 72 | 20 2d 31 20 3f 5c 20 20 |ete-char| -1 ?\ |
|000020b0| 66 72 61 6d 65 2d 68 65 | 69 67 68 74 20 64 65 6c |frame-he|ight del|
|000020c0| 65 74 65 2d 6f 74 68 65 | 72 2d 77 69 6e 64 6f 77 |ete-othe|r-window|
|000020d0| 73 20 73 77 69 74 63 68 | 2d 74 6f 2d 62 75 66 66 |s switch|-to-buff|
|000020e0| 65 72 20 62 75 72 79 2d | 62 75 66 66 65 72 20 30 |er bury-|buffer 0|
|000020f0| 20 73 70 6c 69 74 2d 77 | 69 6e 64 6f 77 20 6f 74 | split-w|indow ot|
|00002100| 68 65 72 2d 77 69 6e 64 | 6f 77 20 31 5d 20 35 20 |her-wind|ow 1] 5 |
|00002110| 28 23 24 20 2e 20 37 38 | 36 31 29 20 6e 69 6c 5d |(#$ . 78|61) nil]|
|00002120| 29 0a 23 40 37 35 20 56 | 69 73 69 74 20 74 68 65 |).#@75 V|isit the|
|00002130| 20 74 61 67 73 20 74 61 | 62 6c 65 20 69 6e 20 74 | tags ta|ble in t|
|00002140| 68 65 20 62 75 66 66 65 | 72 20 6f 6e 20 74 68 69 |he buffe|r on thi|
|00002150| 73 20 6c 69 6e 65 2e 20 | 20 53 65 65 20 60 76 69 |s line. | See `vi|
|00002160| 73 69 74 2d 74 61 67 73 | 2d 74 61 62 6c 65 27 2e |sit-tags|-table'.|
|00002170| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 42 75 66 |..(defal|ias 'Buf|
|00002180| 66 65 72 2d 6d 65 6e 75 | 2d 76 69 73 69 74 2d 74 |fer-menu|-visit-t|
|00002190| 61 67 73 2d 74 61 62 6c | 65 20 23 5b 6e 69 6c 20 |ags-tabl|e #[nil |
|000021a0| 22 c0 c1 c2 21 21 89 1b | ab 85 c4 0b 21 aa 83 c5 |"...!!..|....!...|
|000021b0| c6 21 29 87 22 20 5b 62 | 75 66 66 65 72 2d 66 69 |.!)." [b|uffer-fi|
|000021c0| 6c 65 2d 6e 61 6d 65 20 | 42 75 66 66 65 72 2d 6d |le-name |Buffer-m|
|000021d0| 65 6e 75 2d 62 75 66 66 | 65 72 20 74 20 66 69 6c |enu-buff|er t fil|
|000021e0| 65 20 76 69 73 69 74 2d | 74 61 67 73 2d 74 61 62 |e visit-|tags-tab|
|000021f0| 6c 65 20 65 72 72 6f 72 | 20 22 53 70 65 63 69 66 |le error| "Specif|
|00002200| 69 65 64 20 62 75 66 66 | 65 72 20 68 61 73 20 6e |ied buff|er has n|
|00002210| 6f 20 66 69 6c 65 22 5d | 20 34 20 28 23 24 20 2e |o file"]| 4 (#$ .|
|00002220| 20 38 34 38 37 29 20 6e | 69 6c 5d 29 0a 23 40 35 | 8487) n|il]).#@5|
|00002230| 30 20 53 65 6c 65 63 74 | 20 74 68 69 73 20 6c 69 |0 Select| this li|
|00002240| 6e 65 27 73 20 62 75 66 | 66 65 72 2c 20 61 6c 6f |ne's buf|fer, alo|
|00002250| 6e 65 2c 20 69 6e 20 66 | 75 6c 6c 20 66 72 61 6d |ne, in f|ull fram|
|00002260| 65 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 42 |e...(def|alias 'B|
|00002270| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 31 2d 77 69 6e |uffer-me|nu-1-win|
|00002280| 64 6f 77 20 23 5b 6e 69 | 6c 20 22 c0 c1 c2 21 21 |dow #[ni|l "...!!|
|00002290| 88 c3 c4 20 21 88 c5 20 | 88 c6 c7 20 70 5c 22 87 |... !.. |... p\".|
|000022a0| 22 20 5b 73 77 69 74 63 | 68 2d 74 6f 2d 62 75 66 |" [switc|h-to-buf|
|000022b0| 66 65 72 20 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |fer Buff|er-menu-|
|000022c0| 62 75 66 66 65 72 20 74 | 20 62 75 72 79 2d 62 75 |buffer t| bury-bu|
|000022d0| 66 66 65 72 20 6f 74 68 | 65 72 2d 62 75 66 66 65 |ffer oth|er-buffe|
|000022e0| 72 20 64 65 6c 65 74 65 | 2d 6f 74 68 65 72 2d 77 |r delete|-other-w|
|000022f0| 69 6e 64 6f 77 73 20 73 | 65 74 2d 77 69 6e 64 6f |indows s|et-windo|
|00002300| 77 2d 62 75 66 66 65 72 | 20 73 65 6c 65 63 74 65 |w-buffer| selecte|
|00002310| 64 2d 77 69 6e 64 6f 77 | 5d 20 33 20 28 23 24 20 |d-window|] 3 (#$ |
|00002320| 2e 20 38 37 35 34 29 20 | 6e 69 6c 5d 29 0a 23 40 |. 8754) |nil]).#@|
|00002330| 34 34 20 53 65 6c 65 63 | 74 20 74 68 65 20 62 75 |44 Selec|t the bu|
|00002340| 66 66 65 72 20 77 68 6f | 73 65 20 6c 69 6e 65 20 |ffer who|se line |
|00002350| 79 6f 75 20 63 6c 69 63 | 6b 20 6f 6e 2e 1f 0a 28 |you clic|k on...(|
|00002360| 64 65 66 61 6c 69 61 73 | 20 27 42 75 66 66 65 72 |defalias| 'Buffer|
|00002370| 2d 6d 65 6e 75 2d 6d 6f | 75 73 65 2d 73 65 6c 65 |-menu-mo|use-sele|
|00002380| 63 74 20 23 5b 28 65 76 | 65 6e 74 29 20 22 c0 19 |ct #[(ev|ent) "..|
|00002390| 8a c2 0b 21 71 88 8a c4 | 0b 21 62 88 c5 c6 21 11 |...!q...|.!b...!.|
|000023a0| 2a c7 c8 0b 21 21 88 c9 | ca 20 21 ab 8c ca 20 cb |*...!!..|. !... .|
|000023b0| 20 61 ab 85 cc 09 21 aa | 83 cd 09 21 29 87 22 20 | a....!.|...!)." |
|000023c0| 5b 6e 69 6c 20 62 75 66 | 66 65 72 20 65 76 65 6e |[nil buf|fer even|
|000023d0| 74 2d 62 75 66 66 65 72 | 20 65 76 65 6e 74 20 65 |t-buffer| event e|
|000023e0| 76 65 6e 74 2d 70 6f 69 | 6e 74 20 42 75 66 66 65 |vent-poi|nt Buffe|
|000023f0| 72 2d 6d 65 6e 75 2d 62 | 75 66 66 65 72 20 74 20 |r-menu-b|uffer t |
|00002400| 73 65 6c 65 63 74 2d 77 | 69 6e 64 6f 77 20 65 76 |select-w|indow ev|
|00002410| 65 6e 74 2d 77 69 6e 64 | 6f 77 20 77 69 6e 64 6f |ent-wind|ow windo|
|00002420| 77 2d 64 65 64 69 63 61 | 74 65 64 2d 70 20 73 65 |w-dedica|ted-p se|
|00002430| 6c 65 63 74 65 64 2d 77 | 69 6e 64 6f 77 20 66 72 |lected-w|indow fr|
|00002440| 61 6d 65 2d 72 6f 6f 74 | 2d 77 69 6e 64 6f 77 20 |ame-root|-window |
|00002450| 73 77 69 74 63 68 2d 74 | 6f 2d 62 75 66 66 65 72 |switch-t|o-buffer|
|00002460| 2d 6f 74 68 65 72 2d 66 | 72 61 6d 65 20 73 77 69 |-other-f|rame swi|
|00002470| 74 63 68 2d 74 6f 2d 62 | 75 66 66 65 72 5d 20 33 |tch-to-b|uffer] 3|
|00002480| 20 28 23 24 20 2e 20 39 | 30 31 31 29 20 22 65 22 | (#$ . 9|011) "e"|
|00002490| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 42 75 |]).(defa|lias 'Bu|
|000024a0| 66 66 65 72 2d 6d 65 6e | 75 2d 6d 61 79 62 65 2d |ffer-men|u-maybe-|
|000024b0| 6d 6f 75 73 65 2d 73 65 | 6c 65 63 74 20 23 5b 28 |mouse-se|lect #[(|
|000024c0| 65 76 65 6e 74 20 26 6f | 70 74 69 6f 6e 61 6c 20 |event &o|ptional |
|000024d0| 63 6c 69 63 6b 2d 63 6f | 75 6e 74 29 20 22 08 c1 |click-co|unt) "..|
|000024e0| 59 ad 8c 70 60 c2 20 1b | 1c 1d c6 c7 c8 8f 2b 87 |Y..p`. .|......+.|
|000024f0| 22 20 5b 63 6c 69 63 6b | 2d 63 6f 75 6e 74 20 32 |" [click|-count 2|
|00002500| 20 63 75 72 72 65 6e 74 | 2d 77 69 6e 64 6f 77 2d | current|-window-|
|00002510| 63 6f 6e 66 69 67 75 72 | 61 74 69 6f 6e 20 63 6f |configur|ation co|
|00002520| 6e 66 69 67 20 70 6f 69 | 6e 74 20 62 75 66 66 65 |nfig poi|nt buffe|
|00002530| 72 20 6e 69 6c 20 28 62 | 79 74 65 2d 63 6f 64 65 |r nil (b|yte-code|
|00002540| 20 22 c0 09 21 88 c2 87 | 22 20 5b 42 75 66 66 65 | "..!...|" [Buffe|
|00002550| 72 2d 6d 65 6e 75 2d 6d | 6f 75 73 65 2d 73 65 6c |r-menu-m|ouse-sel|
|00002560| 65 63 74 20 65 76 65 6e | 74 20 74 5d 20 32 29 20 |ect even|t t] 2) |
|00002570| 28 28 65 72 72 6f 72 20 | 28 62 79 74 65 2d 63 6f |((error |(byte-co|
|00002580| 64 65 20 22 c0 09 21 88 | 5c 6e 71 88 0b 62 88 c4 |de "..!.|\nq..b..|
|00002590| 87 22 20 5b 73 65 74 2d | 77 69 6e 64 6f 77 2d 63 |." [set-|window-c|
|000025a0| 6f 6e 66 69 67 75 72 61 | 74 69 6f 6e 20 63 6f 6e |onfigura|tion con|
|000025b0| 66 69 67 20 62 75 66 66 | 65 72 20 70 6f 69 6e 74 |fig buff|er point|
|000025c0| 20 6e 69 6c 5d 20 32 29 | 29 29 5d 20 33 20 6e 69 | nil] 2)|))] 3 ni|
|000025d0| 6c 20 22 65 22 5d 29 0a | 23 40 34 33 20 53 65 6c |l "e"]).|#@43 Sel|
|000025e0| 65 63 74 20 74 68 69 73 | 20 6c 69 6e 65 27 73 20 |ect this| line's |
|000025f0| 62 75 66 66 65 72 20 69 | 6e 20 74 68 69 73 20 77 |buffer i|n this w|
|00002600| 69 6e 64 6f 77 2e 1f 0a | 28 64 65 66 61 6c 69 61 |indow...|(defalia|
|00002610| 73 20 27 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 74 |s 'Buffe|r-menu-t|
|00002620| 68 69 73 2d 77 69 6e 64 | 6f 77 20 23 5b 6e 69 6c |his-wind|ow #[nil|
|00002630| 20 22 c0 c1 c2 21 21 87 | 22 20 5b 73 77 69 74 63 | "...!!.|" [switc|
|00002640| 68 2d 74 6f 2d 62 75 66 | 66 65 72 20 42 75 66 66 |h-to-buf|fer Buff|
|00002650| 65 72 2d 6d 65 6e 75 2d | 62 75 66 66 65 72 20 74 |er-menu-|buffer t|
|00002660| 5d 20 33 20 28 23 24 20 | 2e 20 39 36 39 33 29 20 |] 3 (#$ |. 9693) |
|00002670| 6e 69 6c 5d 29 0a 23 40 | 37 33 20 53 65 6c 65 63 |nil]).#@|73 Selec|
|00002680| 74 20 74 68 69 73 20 6c | 69 6e 65 27 73 20 62 75 |t this l|ine's bu|
|00002690| 66 66 65 72 20 69 6e 20 | 6f 74 68 65 72 20 77 69 |ffer in |other wi|
|000026a0| 6e 64 6f 77 2c 20 6c 65 | 61 76 69 6e 67 20 62 75 |ndow, le|aving bu|
|000026b0| 66 66 65 72 20 6d 65 6e | 75 20 76 69 73 69 62 6c |ffer men|u visibl|
|000026c0| 65 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 42 |e...(def|alias 'B|
|000026d0| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 6f 74 68 65 72 |uffer-me|nu-other|
|000026e0| 2d 77 69 6e 64 6f 77 20 | 23 5b 6e 69 6c 20 22 c0 |-window |#[nil ".|
|000026f0| c1 c2 21 21 87 22 20 5b | 73 77 69 74 63 68 2d 74 |..!!." [|switch-t|
|00002700| 6f 2d 62 75 66 66 65 72 | 2d 6f 74 68 65 72 2d 77 |o-buffer|-other-w|
|00002710| 69 6e 64 6f 77 20 42 75 | 66 66 65 72 2d 6d 65 6e |indow Bu|ffer-men|
|00002720| 75 2d 62 75 66 66 65 72 | 20 74 5d 20 33 20 28 23 |u-buffer| t] 3 (#|
|00002730| 24 20 2e 20 39 38 35 31 | 29 20 6e 69 6c 5d 29 0a |$ . 9851|) nil]).|
|00002740| 23 40 38 37 20 4d 61 6b | 65 20 74 68 65 20 6f 74 |#@87 Mak|e the ot|
|00002750| 68 65 72 20 77 69 6e 64 | 6f 77 20 73 65 6c 65 63 |her wind|ow selec|
|00002760| 74 20 74 68 69 73 20 6c | 69 6e 65 27 73 20 62 75 |t this l|ine's bu|
|00002770| 66 66 65 72 2e 0a 54 68 | 65 20 63 75 72 72 65 6e |ffer..Th|e curren|
|00002780| 74 20 77 69 6e 64 6f 77 | 20 72 65 6d 61 69 6e 73 |t window| remains|
|00002790| 20 73 65 6c 65 63 74 65 | 64 2e 1f 0a 28 64 65 66 | selecte|d...(def|
|000027a0| 61 6c 69 61 73 20 27 42 | 75 66 66 65 72 2d 6d 65 |alias 'B|uffer-me|
|000027b0| 6e 75 2d 73 77 69 74 63 | 68 2d 6f 74 68 65 72 2d |nu-switc|h-other-|
|000027c0| 77 69 6e 64 6f 77 20 23 | 5b 6e 69 6c 20 22 c0 c1 |window #|[nil "..|
|000027d0| c2 21 21 87 22 20 5b 64 | 69 73 70 6c 61 79 2d 62 |.!!." [d|isplay-b|
|000027e0| 75 66 66 65 72 20 42 75 | 66 66 65 72 2d 6d 65 6e |uffer Bu|ffer-men|
|000027f0| 75 2d 62 75 66 66 65 72 | 20 74 5d 20 33 20 28 23 |u-buffer| t] 3 (#|
|00002800| 24 20 2e 20 31 30 30 35 | 33 29 20 6e 69 6c 5d 29 |$ . 1005|3) nil])|
|00002810| 0a 23 40 36 37 20 53 65 | 6c 65 63 74 20 74 68 69 |.#@67 Se|lect thi|
|00002820| 73 20 6c 69 6e 65 27 73 | 20 62 75 66 66 65 72 2c |s line's| buffer,|
|00002830| 20 77 69 74 68 20 70 72 | 65 76 69 6f 75 73 20 62 | with pr|evious b|
|00002840| 75 66 66 65 72 20 69 6e | 20 73 65 63 6f 6e 64 20 |uffer in| second |
|00002850| 77 69 6e 64 6f 77 2e 1f | 0a 28 64 65 66 61 6c 69 |window..|.(defali|
|00002860| 61 73 20 27 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |as 'Buff|er-menu-|
|00002870| 32 2d 77 69 6e 64 6f 77 | 20 23 5b 6e 69 6c 20 22 |2-window| #[nil "|
|00002880| c0 c1 21 70 c1 1a 1b 1c | c5 20 88 c6 c7 20 21 88 |..!p....|. ... !.|
|00002890| c8 0c 21 88 c9 0b 21 2b | 87 22 20 5b 42 75 66 66 |..!...!+|." [Buff|
|000028a0| 65 72 2d 6d 65 6e 75 2d | 62 75 66 66 65 72 20 74 |er-menu-|buffer t|
|000028b0| 20 70 6f 70 2d 75 70 2d | 77 69 6e 64 6f 77 73 20 | pop-up-|windows |
|000028c0| 6d 65 6e 75 20 62 75 66 | 66 20 64 65 6c 65 74 65 |menu buf|f delete|
|000028d0| 2d 6f 74 68 65 72 2d 77 | 69 6e 64 6f 77 73 20 73 |-other-w|indows s|
|000028e0| 77 69 74 63 68 2d 74 6f | 2d 62 75 66 66 65 72 20 |witch-to|-buffer |
|000028f0| 6f 74 68 65 72 2d 62 75 | 66 66 65 72 20 70 6f 70 |other-bu|ffer pop|
|00002900| 2d 74 6f 2d 62 75 66 66 | 65 72 20 62 75 72 79 2d |-to-buff|er bury-|
|00002910| 62 75 66 66 65 72 5d 20 | 33 20 28 23 24 20 2e 20 |buffer] |3 (#$ . |
|00002920| 31 30 32 36 32 29 20 6e | 69 6c 5d 29 0a 23 40 37 |10262) n|il]).#@7|
|00002930| 38 20 54 6f 67 67 6c 65 | 20 72 65 61 64 2d 6f 6e |8 Toggle| read-on|
|00002940| 6c 79 20 73 74 61 74 75 | 73 20 6f 66 20 62 75 66 |ly statu|s of buf|
|00002950| 66 65 72 20 6f 6e 20 74 | 68 69 73 20 6c 69 6e 65 |fer on t|his line|
|00002960| 2c 20 70 65 72 68 61 70 | 73 20 76 69 61 20 76 65 |, perhap|s via ve|
|00002970| 72 73 69 6f 6e 20 63 6f | 6e 74 72 6f 6c 2e 1f 0a |rsion co|ntrol...|
|00002980| 28 64 65 66 61 6c 69 61 | 73 20 27 42 75 66 66 65 |(defalia|s 'Buffe|
|00002990| 72 2d 6d 65 6e 75 2d 74 | 6f 67 67 6c 65 2d 72 65 |r-menu-t|oggle-re|
|000029a0| 61 64 2d 6f 6e 6c 79 20 | 23 5b 6e 69 6c 20 22 c0 |ad-only |#[nil ".|
|000029b0| 19 8a c2 c3 21 71 88 c4 | 20 88 0d ab 83 c6 aa 81 |....!q..| .......|
|000029c0| c7 11 29 8a c8 79 88 c9 | 75 88 67 09 55 3f ad 89 |..)..y..|u.g.U?..|
|000029d0| c0 1d ca cb 21 88 09 63 | 29 2a 87 22 20 5b 6e 69 |....!..c|)*." [ni|
|000029e0| 6c 20 63 68 61 72 20 42 | 75 66 66 65 72 2d 6d 65 |l char B|uffer-me|
|000029f0| 6e 75 2d 62 75 66 66 65 | 72 20 74 20 76 63 2d 74 |nu-buffe|r t vc-t|
|00002a00| 6f 67 67 6c 65 2d 72 65 | 61 64 2d 6f 6e 6c 79 20 |oggle-re|ad-only |
|00002a10| 62 75 66 66 65 72 2d 72 | 65 61 64 2d 6f 6e 6c 79 |buffer-r|ead-only|
|00002a20| 20 3f 5c 25 20 3f 5c 20 | 20 30 20 32 20 64 65 6c | ?\% ?\ | 0 2 del|
|00002a30| 65 74 65 2d 63 68 61 72 | 20 31 5d 20 32 20 28 23 |ete-char| 1] 2 (#|
|00002a40| 24 20 2e 20 31 30 35 34 | 36 29 20 6e 69 6c 5d 29 |$ . 1054|6) nil])|
|00002a50| 0a 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 c1 21 |.(byte-c|ode "..!|
|00002a60| ac 82 c2 11 c1 0b 42 13 | c0 87 22 20 5b 62 6f 75 |......B.|.." [bou|
|00002a70| 6e 64 70 20 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |ndp Buff|er-menu-|
|00002a80| 70 6f 70 75 70 2d 6d 65 | 6e 75 20 28 22 42 75 66 |popup-me|nu ("Buf|
|00002a90| 66 65 72 20 43 6f 6d 6d | 61 6e 64 73 22 20 5b 22 |fer Comm|ands" ["|
|00002aa0| 53 65 6c 65 63 74 20 42 | 75 66 66 65 72 22 20 42 |Select B|uffer" B|
|00002ab0| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 73 65 6c 65 63 |uffer-me|nu-selec|
|00002ac0| 74 20 74 5d 20 5b 22 53 | 65 6c 65 63 74 20 62 75 |t t] ["S|elect bu|
|00002ad0| 66 66 65 72 20 4f 74 68 | 65 72 20 57 69 6e 64 6f |ffer Oth|er Windo|
|00002ae0| 77 22 20 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 6f |w" Buffe|r-menu-o|
|00002af0| 74 68 65 72 2d 77 69 6e | 64 6f 77 20 74 5d 20 5b |ther-win|dow t] [|
|00002b00| 22 43 6c 65 61 72 20 42 | 75 66 66 65 72 20 4d 6f |"Clear B|uffer Mo|
|00002b10| 64 69 66 69 63 61 74 69 | 6f 6e 20 46 6c 61 67 22 |dificati|on Flag"|
|00002b20| 20 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 6e 6f 74 | Buffer-|menu-not|
|00002b30| 2d 6d 6f 64 69 66 69 65 | 64 20 74 5d 20 22 2d 2d |-modifie|d t] "--|
|00002b40| 2d 2d 22 20 5b 22 4d 61 | 72 6b 20 42 75 66 66 65 |--" ["Ma|rk Buffe|
|00002b50| 72 20 66 6f 72 20 53 65 | 6c 65 63 74 69 6f 6e 22 |r for Se|lection"|
|00002b60| 20 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 6d 61 72 | Buffer-|menu-mar|
|00002b70| 6b 20 74 5d 20 5b 22 4d | 61 72 6b 20 42 75 66 66 |k t] ["M|ark Buff|
|00002b80| 65 72 20 66 6f 72 20 53 | 61 76 65 22 20 42 75 66 |er for S|ave" Buf|
|00002b90| 66 65 72 2d 6d 65 6e 75 | 2d 73 61 76 65 20 74 5d |fer-menu|-save t]|
|00002ba0| 20 5b 22 4d 61 72 6b 20 | 42 75 66 66 65 72 20 66 | ["Mark |Buffer f|
|00002bb0| 6f 72 20 44 65 6c 65 74 | 69 6f 6e 22 20 42 75 66 |or Delet|ion" Buf|
|00002bc0| 66 65 72 2d 6d 65 6e 75 | 2d 64 65 6c 65 74 65 20 |fer-menu|-delete |
|00002bd0| 74 5d 20 5b 22 55 6e 6d | 61 72 6b 20 42 75 66 66 |t] ["Unm|ark Buff|
|00002be0| 65 72 22 20 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |er" Buff|er-menu-|
|00002bf0| 75 6e 6d 61 72 6b 20 74 | 5d 20 22 2d 2d 2d 2d 22 |unmark t|] "----"|
|00002c00| 20 5b 22 44 65 6c 65 74 | 65 2f 53 61 76 65 20 4d | ["Delet|e/Save M|
|00002c10| 61 72 6b 65 64 20 42 75 | 66 66 65 72 73 22 20 42 |arked Bu|ffers" B|
|00002c20| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 65 78 65 63 75 |uffer-me|nu-execu|
|00002c30| 74 65 20 74 5d 29 20 63 | 75 72 72 65 6e 74 2d 6c |te t]) c|urrent-l|
|00002c40| 6f 61 64 2d 6c 69 73 74 | 5d 20 32 29 0a 28 64 65 |oad-list|] 2).(de|
|00002c50| 66 61 6c 69 61 73 20 27 | 42 75 66 66 65 72 2d 6d |falias '|Buffer-m|
|00002c60| 65 6e 75 2d 70 6f 70 75 | 70 2d 6d 65 6e 75 20 23 |enu-popu|p-menu #|
|00002c70| 5b 28 65 76 65 6e 74 29 | 20 22 c0 09 21 88 c2 79 |[(event)| "..!..y|
|00002c80| 88 c3 c4 21 89 1d ab 93 | c6 0e 07 40 c8 c9 0d 21 |...!....|...@...!|
|00002c90| ca 51 cb 45 0e 07 41 a4 | 21 aa 83 cc cd 21 29 87 |.Q.E..A.|!....!).|
|00002ca0| 22 20 5b 6d 6f 75 73 65 | 2d 73 65 74 2d 70 6f 69 |" [mouse|-set-poi|
|00002cb0| 6e 74 20 65 76 65 6e 74 | 20 30 20 42 75 66 66 65 |nt event| 0 Buffe|
|00002cc0| 72 2d 6d 65 6e 75 2d 62 | 75 66 66 65 72 20 6e 69 |r-menu-b|uffer ni|
|00002cd0| 6c 20 62 75 66 66 65 72 | 20 70 6f 70 75 70 2d 6d |l buffer| popup-m|
|00002ce0| 65 6e 75 20 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |enu Buff|er-menu-|
|00002cf0| 70 6f 70 75 70 2d 6d 65 | 6e 75 20 22 43 6f 6d 6d |popup-me|nu "Comm|
|00002d00| 61 6e 64 73 20 6f 6e 20 | 62 75 66 66 65 72 20 5c |ands on |buffer \|
|00002d10| 22 22 20 62 75 66 66 65 | 72 2d 6e 61 6d 65 20 22 |"" buffe|r-name "|
|00002d20| 5c 22 3a 22 20 22 2d 2d | 2d 2d 22 20 65 72 72 6f |\":" "--|--" erro|
|00002d30| 72 20 22 6e 6f 20 62 75 | 66 66 65 72 20 6f 6e 20 |r "no bu|ffer on |
|00002d40| 74 68 69 73 20 6c 69 6e | 65 22 5d 20 36 20 6e 69 |this lin|e"] 6 ni|
|00002d50| 6c 20 22 65 22 5d 29 0a | 28 62 79 74 65 2d 63 6f |l "e"]).|(byte-co|
|00002d60| 64 65 20 22 c0 c1 21 ac | 86 c2 c3 c4 50 21 11 c1 |de "..!.|....P!..|
|00002d70| 0d 42 15 c0 87 22 20 5b | 62 6f 75 6e 64 70 20 6c |.B..." [|boundp l|
|00002d80| 69 73 74 2d 62 75 66 66 | 65 72 73 2d 68 65 61 64 |ist-buff|ers-head|
|00002d90| 65 72 2d 6c 69 6e 65 20 | 70 75 72 65 63 6f 70 79 |er-line |purecopy|
|00002da0| 20 22 20 4d 52 20 42 75 | 66 66 65 72 20 20 20 20 | " MR Bu|ffer |
|00002db0| 20 20 20 20 20 20 20 53 | 69 7a 65 20 20 4d 6f 64 | S|ize Mod|
|00002dc0| 65 20 20 20 20 20 20 20 | 20 20 46 69 6c 65 5c 6e |e | File\n|
|00002dd0| 22 20 22 20 2d 2d 20 2d | 2d 2d 2d 2d 2d 20 20 20 |" " -- -|----- |
|00002de0| 20 20 20 20 20 20 20 20 | 2d 2d 2d 2d 20 20 2d 2d | |---- --|
|00002df0| 2d 2d 20 20 20 20 20 20 | 20 20 20 2d 2d 2d 2d 5c |-- | ----\|
|00002e00| 6e 22 20 63 75 72 72 65 | 6e 74 2d 6c 6f 61 64 2d |n" curre|nt-load-|
|00002e10| 6c 69 73 74 5d 20 33 29 | 0a 23 40 31 33 34 20 53 |list] 3)|.#@134 S|
|00002e20| 74 72 69 6e 67 20 75 73 | 65 64 20 74 6f 20 69 64 |tring us|ed to id|
|00002e30| 65 6e 74 69 66 79 20 74 | 68 69 73 20 62 75 66 66 |entify t|his buff|
|00002e40| 65 72 2c 20 6f 72 20 61 | 20 66 75 6e 63 74 69 6f |er, or a| functio|
|00002e50| 6e 20 6f 66 20 6f 6e 65 | 20 61 72 67 75 6d 65 6e |n of one| argumen|
|00002e60| 74 0a 74 6f 20 67 65 6e | 65 72 61 74 65 20 73 75 |t.to gen|erate su|
|00002e70| 63 68 20 61 20 73 74 72 | 69 6e 67 2e 20 20 54 68 |ch a str|ing. Th|
|00002e80| 69 73 20 76 61 72 69 61 | 62 6c 65 20 69 73 20 61 |is varia|ble is a|
|00002e90| 6c 77 61 79 73 20 62 75 | 66 66 65 72 2d 6c 6f 63 |lways bu|ffer-loc|
|00002ea0| 61 6c 2e 1f 0a 28 64 65 | 66 76 61 72 20 6c 69 73 |al...(de|fvar lis|
|00002eb0| 74 2d 62 75 66 66 65 72 | 73 2d 69 64 65 6e 74 69 |t-buffer|s-identi|
|00002ec0| 66 69 63 61 74 69 6f 6e | 20 27 64 65 66 61 75 6c |fication| 'defaul|
|00002ed0| 74 2d 6c 69 73 74 2d 62 | 75 66 66 65 72 73 2d 69 |t-list-b|uffers-i|
|00002ee0| 64 65 6e 74 69 66 69 63 | 61 74 69 6f 6e 20 28 23 |dentific|ation (#|
|00002ef0| 24 20 2e 20 31 31 38 30 | 37 29 29 0a 28 62 79 74 |$ . 1180|7)).(byt|
|00002f00| 65 2d 63 6f 64 65 20 22 | c0 c1 21 88 c2 c3 21 ac |e-code "|..!...!.|
|00002f10| 82 c4 13 c3 0d 42 15 c0 | c3 21 87 22 20 5b 6d 61 |.....B..|.!." [ma|
|00002f20| 6b 65 2d 76 61 72 69 61 | 62 6c 65 2d 62 75 66 66 |ke-varia|ble-buff|
|00002f30| 65 72 2d 6c 6f 63 61 6c | 20 6c 69 73 74 2d 62 75 |er-local| list-bu|
|00002f40| 66 66 65 72 73 2d 69 64 | 65 6e 74 69 66 69 63 61 |ffers-id|entifica|
|00002f50| 74 69 6f 6e 20 62 6f 75 | 6e 64 70 20 6c 69 73 74 |tion bou|ndp list|
|00002f60| 2d 62 75 66 66 65 72 73 | 2d 64 69 72 65 63 74 6f |-buffers|-directo|
|00002f70| 72 79 20 6e 69 6c 20 63 | 75 72 72 65 6e 74 2d 6c |ry nil c|urrent-l|
|00002f80| 6f 61 64 2d 6c 69 73 74 | 5d 20 32 29 0a 28 64 65 |oad-list|] 2).(de|
|00002f90| 66 61 6c 69 61 73 20 27 | 64 65 66 61 75 6c 74 2d |falias '|default-|
|00002fa0| 6c 69 73 74 2d 62 75 66 | 66 65 72 73 2d 69 64 65 |list-buf|fers-ide|
|00002fb0| 6e 74 69 66 69 63 61 74 | 69 6f 6e 20 23 5b 28 6f |ntificat|ion #[(o|
|00002fc0| 75 74 70 75 74 29 20 22 | 8a c0 70 21 ae 86 c1 c2 |utput) "|..p!....|
|00002fd0| 21 ad 81 5c 6e c3 20 0c | c5 89 89 89 1e 06 1e 07 |!..\n. .|........|
|00002fe0| 1e 08 1e 09 1e 5c 6e 1e | 0b 1e 0c 0e 0d 71 88 c5 |.....\n.|.....q..|
|00002ff0| 7f 88 60 16 09 ce 0e 0b | 0e 0d 5c 22 88 60 16 08 |..`.....|..\".`..|
|00003000| cf d0 d1 5c 22 88 60 16 | 06 0e 09 0e 06 56 ab 84 |...\".`.|.....V..|
|00003010| 0e 09 62 88 d2 0e 08 0e | 06 5a 5a 89 16 07 d3 56 |..b.....|.ZZ....V|
|00003020| ab 8b d4 63 88 0e 07 53 | 89 16 07 aa 71 c5 7f 88 |...c...S|....q...|
|00003030| d5 d6 d7 5c 22 88 0e 5c | 6e 63 88 0e 0c ad 9c d3 |...\"..\|nc......|
|00003040| d8 69 5a 89 16 07 56 ab | 8a d9 0e 07 0e 09 60 5a |.iZ...V.|......`Z|
|00003050| 5d 21 88 d5 da d7 5c 22 | 88 0e 0c 63 2e 08 87 22 |]!....\"|...c..."|
|00003060| 20 5b 62 75 66 66 65 72 | 2d 66 69 6c 65 2d 6e 61 | [buffer|-file-na|
|00003070| 6d 65 20 62 6f 75 6e 64 | 70 20 6c 69 73 74 2d 62 |me bound|p list-b|
|00003080| 75 66 66 65 72 73 2d 64 | 69 72 65 63 74 6f 72 79 |uffers-d|irectory|
|00003090| 20 62 75 66 66 65 72 2d | 73 69 7a 65 20 6d 6f 64 | buffer-|size mod|
|000030a0| 65 2d 6e 61 6d 65 20 6e | 69 6c 20 63 6f 6c 20 73 |e-name n|il col s|
|000030b0| 20 70 20 65 6f 62 20 6d | 6f 64 65 20 73 69 7a 65 | p eob m|ode size|
|000030c0| 20 66 69 6c 65 20 6f 75 | 74 70 75 74 20 70 72 69 | file ou|tput pri|
|000030d0| 6e 31 20 6d 6f 76 65 2d | 74 6f 2d 63 6f 6c 75 6d |n1 move-|to-colum|
|000030e0| 6e 20 31 39 20 74 20 36 | 20 30 20 3f 5c 20 20 69 |n 19 t 6| 0 ?\ i|
|000030f0| 6e 64 65 6e 74 2d 74 6f | 20 32 37 20 31 20 33 39 |ndent-to| 27 1 39|
|00003100| 20 64 65 6c 65 74 65 2d | 63 68 61 72 20 34 30 5d | delete-|char 40]|
|00003110| 20 38 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 | 8]).(de|falias '|
|00003120| 6c 69 73 74 2d 62 75 66 | 66 65 72 73 2d 69 6e 74 |list-buf|fers-int|
|00003130| 65 72 6e 61 6c 20 23 5b | 28 6f 75 74 70 75 74 20 |ernal #[|(output |
|00003140| 26 6f 70 74 69 6f 6e 61 | 6c 20 70 72 65 64 69 63 |&optiona|l predic|
|00003150| 61 74 65 29 20 22 70 c0 | 20 19 1a 8a 0b 71 88 c4 |ate) "p.| ....q..|
|00003160| 15 c6 20 88 c7 0b 21 88 | 0e 08 63 88 09 83 d6 00 |.. ...!.|..c.....|
|00003170| c9 1e 5c 6e 09 40 1e 0b | cc 0e 0b 21 1e 0d c4 1e |..\n.@..|...!....|
|00003180| 0e 09 41 11 0e 0d 83 d2 | 00 0e 0f ab 95 0e 0f 3b |..A.....|.......;|
|00003190| ab 88 d0 0e 0f 0e 0d 5c | 22 aa 85 0e 0f 0e 0b 21 |.......\|"......!|
|000031a0| 83 d2 00 0e 0b 71 88 0d | 0e 11 1e 12 1e 13 0b 71 |.....q..|.......q|
|000031b0| 88 60 16 0e 0e 0b 5c 6e | 61 ab 85 60 12 d4 aa 81 |.`....\n|a..`....|
|000031c0| d5 63 88 d6 0e 0b 21 ab | 83 d7 aa 81 d5 63 88 0e |.c....!.|.....c..|
|000031d0| 13 ab 83 d8 aa 81 d5 63 | 88 d0 d9 0e 0d 5c 22 ab |.......c|.....\".|
|000031e0| 8c da 1e 1b dc 0e 0d 0b | 5c 22 88 29 aa 86 d5 0e |........|\".)....|
|000031f0| 0d b1 02 88 dd 0e 5c 6e | de 5c 22 88 0e 12 3b ab |......\n|.\"...;.|
|00003200| 86 0e 12 63 88 aa 93 0e | 12 ab 8f 0e 0b 71 88 df |...c....|.....q..|
|00003210| e0 e1 8f 88 0b 71 88 64 | 62 88 2a e2 0e 0e 60 cc |.....q.d|b.*...`.|
|00003220| 0e 0d 24 88 e2 0e 0e 60 | e3 da 24 88 e4 63 88 2c |..$....`|..$..c.,|
|00003230| 82 16 00 e5 20 88 e6 5c | 6e 21 3f ad 82 5c 6e 62 |.... ..\|n!?..\nb|
|00003240| 2b 87 22 20 5b 62 75 66 | 66 65 72 2d 6c 69 73 74 |+." [buf|fer-list|
|00003250| 20 62 75 66 66 65 72 73 | 20 63 75 72 72 65 6e 74 | buffers| current|
|00003260| 20 6f 75 74 70 75 74 20 | 6e 69 6c 20 62 75 66 66 | output |nil buff|
|00003270| 65 72 2d 72 65 61 64 2d | 6f 6e 6c 79 20 65 72 61 |er-read-|only era|
|00003280| 73 65 2d 62 75 66 66 65 | 72 20 62 75 66 66 65 72 |se-buffe|r buffer|
|00003290| 2d 64 69 73 61 62 6c 65 | 2d 75 6e 64 6f 20 6c 69 |-disable|-undo li|
|000032a0| 73 74 2d 62 75 66 66 65 | 72 73 2d 68 65 61 64 65 |st-buffe|rs-heade|
|000032b0| 72 2d 6c 69 6e 65 20 31 | 39 20 63 6f 6c 31 20 62 |r-line 1|9 col1 b|
|000032c0| 75 66 66 65 72 20 62 75 | 66 66 65 72 2d 6e 61 6d |uffer bu|ffer-nam|
|000032d0| 65 20 6e 61 6d 65 20 74 | 68 69 73 2d 62 75 66 66 |e name t|his-buff|
|000032e0| 65 72 2d 6c 69 6e 65 2d | 73 74 61 72 74 20 70 72 |er-line-|start pr|
|000032f0| 65 64 69 63 61 74 65 20 | 73 74 72 69 6e 67 2d 6d |edicate |string-m|
|00003300| 61 74 63 68 20 6c 69 73 | 74 2d 62 75 66 66 65 72 |atch lis|t-buffer|
|00003310| 73 2d 69 64 65 6e 74 69 | 66 69 63 61 74 69 6f 6e |s-identi|fication|
|00003320| 20 69 64 20 72 6f 20 3f | 5c 2e 20 3f 5c 20 20 62 | id ro ?|\. ?\ b|
|00003330| 75 66 66 65 72 2d 6d 6f | 64 69 66 69 65 64 2d 70 |uffer-mo|dified-p|
|00003340| 20 3f 5c 2a 20 3f 5c 25 | 20 22 5b 5c 6e 5c 22 5c | ?\* ?\%| "[\n\"\|
|00003350| 5c 20 09 5d 22 20 74 20 | 70 72 69 6e 74 2d 65 73 |\ .]" t |print-es|
|00003360| 63 61 70 65 2d 6e 65 77 | 6c 69 6e 65 73 20 70 72 |cape-new|lines pr|
|00003370| 69 6e 31 20 69 6e 64 65 | 6e 74 2d 74 6f 20 31 20 |in1 inde|nt-to 1 |
|00003380| 65 20 28 66 75 6e 63 61 | 6c 6c 20 69 64 20 6f 75 |e (funca|ll id ou|
|00003390| 74 70 75 74 29 20 28 28 | 65 72 72 6f 72 20 28 62 |tput) ((|error (b|
|000033a0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 5c 6e 5c 22 |yte-code| "..\n\"|
|000033b0| 88 c3 0c 5c 6e 5c 22 87 | 22 20 5b 70 72 69 6e 63 |...\n\".|" [princ|
|000033c0| 20 22 2a 2a 2a 22 20 6f | 75 74 70 75 74 20 70 72 | "***" o|utput pr|
|000033d0| 69 6e 31 20 65 5d 20 33 | 29 29 29 20 70 75 74 2d |in1 e] 3|))) put-|
|000033e0| 6e 6f 6e 64 75 70 6c 69 | 63 61 62 6c 65 2d 74 65 |nondupli|cable-te|
|000033f0| 78 74 2d 70 72 6f 70 65 | 72 74 79 20 68 69 67 68 |xt-prope|rty high|
|00003400| 6c 69 67 68 74 20 3f 5c | 6e 20 42 75 66 66 65 72 |light ?\|n Buffer|
|00003410| 2d 6d 65 6e 75 2d 6d 6f | 64 65 20 62 75 66 66 65 |-menu-mo|de buffe|
|00003420| 72 70 5d 20 35 5d 29 0a | 23 40 33 34 38 20 44 69 |rp] 5]).|#@348 Di|
|00003430| 73 70 6c 61 79 20 61 20 | 6c 69 73 74 20 6f 66 20 |splay a |list of |
|00003440| 6e 61 6d 65 73 20 6f 66 | 20 65 78 69 73 74 69 6e |names of| existin|
|00003450| 67 20 62 75 66 66 65 72 | 73 2e 0a 54 68 65 20 6c |g buffer|s..The l|
|00003460| 69 73 74 20 69 73 20 64 | 69 73 70 6c 61 79 65 64 |ist is d|isplayed|
|00003470| 20 69 6e 20 61 20 62 75 | 66 66 65 72 20 6e 61 6d | in a bu|ffer nam|
|00003480| 65 64 20 60 2a 42 75 66 | 66 65 72 20 4c 69 73 74 |ed `*Buf|fer List|
|00003490| 2a 27 2e 0a 4e 6f 74 65 | 20 74 68 61 74 20 62 75 |*'..Note| that bu|
|000034a0| 66 66 65 72 73 20 77 69 | 74 68 20 6e 61 6d 65 73 |ffers wi|th names|
|000034b0| 20 73 74 61 72 74 69 6e | 67 20 77 69 74 68 20 73 | startin|g with s|
|000034c0| 70 61 63 65 73 20 61 72 | 65 20 6f 6d 69 74 74 65 |paces ar|e omitte|
|000034d0| 64 2e 0a 4e 6f 6e 2d 6e | 75 6c 6c 20 6f 70 74 69 |d..Non-n|ull opti|
|000034e0| 6f 6e 61 6c 20 61 72 67 | 20 46 49 4c 45 53 2d 4f |onal arg| FILES-O|
|000034f0| 4e 4c 59 20 6d 65 61 6e | 73 20 6d 65 6e 74 69 6f |NLY mean|s mentio|
|00003500| 6e 20 6f 6e 6c 79 20 66 | 69 6c 65 20 62 75 66 66 |n only f|ile buff|
|00003510| 65 72 73 2e 0a 0a 54 68 | 65 20 4d 20 63 6f 6c 75 |ers...Th|e M colu|
|00003520| 6d 6e 20 63 6f 6e 74 61 | 69 6e 73 20 61 20 2a 20 |mn conta|ins a * |
|00003530| 66 6f 72 20 62 75 66 66 | 65 72 73 20 74 68 61 74 |for buff|ers that|
|00003540| 20 61 72 65 20 6d 6f 64 | 69 66 69 65 64 2e 0a 54 | are mod|ified..T|
|00003550| 68 65 20 52 20 63 6f 6c | 75 6d 6e 20 63 6f 6e 74 |he R col|umn cont|
|00003560| 61 69 6e 73 20 61 20 25 | 20 66 6f 72 20 62 75 66 |ains a %| for buf|
|00003570| 66 65 72 73 20 74 68 61 | 74 20 61 72 65 20 72 65 |fers tha|t are re|
|00003580| 61 64 2d 6f 6e 6c 79 2e | 1f 0a 28 64 65 66 61 6c |ad-only.|..(defal|
|00003590| 69 61 73 20 27 6c 69 73 | 74 2d 62 75 66 66 65 72 |ias 'lis|t-buffer|
|000035a0| 73 20 23 5b 28 26 6f 70 | 74 69 6f 6e 61 6c 20 66 |s #[(&op|tional f|
|000035b0| 69 6c 65 73 2d 6f 6e 6c | 79 29 20 22 c0 c1 5c 6e |iles-onl|y) "..\n|
|000035c0| 21 21 87 22 20 5b 64 69 | 73 70 6c 61 79 2d 62 75 |!!." [di|splay-bu|
|000035d0| 66 66 65 72 20 6c 69 73 | 74 2d 62 75 66 66 65 72 |ffer lis|t-buffer|
|000035e0| 73 2d 6e 6f 73 65 6c 65 | 63 74 20 66 69 6c 65 73 |s-nosele|ct files|
|000035f0| 2d 6f 6e 6c 79 5d 20 33 | 20 28 23 24 20 2e 20 31 |-only] 3| (#$ . 1|
|00003600| 33 33 35 38 29 20 28 6c | 69 73 74 20 28 69 66 20 |3358) (l|ist (if |
|00003610| 63 75 72 72 65 6e 74 2d | 70 72 65 66 69 78 2d 61 |current-|prefix-a|
|00003620| 72 67 20 74 20 6e 69 6c | 29 29 5d 29 0a 23 40 33 |rg t nil|))]).#@3|
|00003630| 35 32 20 43 72 65 61 74 | 65 20 61 6e 64 20 72 65 |52 Creat|e and re|
|00003640| 74 75 72 6e 20 61 20 62 | 75 66 66 65 72 20 77 69 |turn a b|uffer wi|
|00003650| 74 68 20 61 20 6c 69 73 | 74 20 6f 66 20 6e 61 6d |th a lis|t of nam|
|00003660| 65 73 20 6f 66 20 65 78 | 69 73 74 69 6e 67 20 62 |es of ex|isting b|
|00003670| 75 66 66 65 72 73 2e 0a | 54 68 65 20 62 75 66 66 |uffers..|The buff|
|00003680| 65 72 20 69 73 20 6e 61 | 6d 65 64 20 60 2a 42 75 |er is na|med `*Bu|
|00003690| 66 66 65 72 20 4c 69 73 | 74 2a 27 2e 0a 4e 6f 74 |ffer Lis|t*'..Not|
|000036a0| 65 20 74 68 61 74 20 62 | 75 66 66 65 72 73 20 77 |e that b|uffers w|
|000036b0| 69 74 68 20 6e 61 6d 65 | 73 20 73 74 61 72 74 69 |ith name|s starti|
|000036c0| 6e 67 20 77 69 74 68 20 | 73 70 61 63 65 73 20 61 |ng with |spaces a|
|000036d0| 72 65 20 6f 6d 69 74 74 | 65 64 2e 0a 4e 6f 6e 2d |re omitt|ed..Non-|
|000036e0| 6e 75 6c 6c 20 6f 70 74 | 69 6f 6e 61 6c 20 61 72 |null opt|ional ar|
|000036f0| 67 20 46 49 4c 45 53 2d | 4f 4e 4c 59 20 6d 65 61 |g FILES-|ONLY mea|
|00003700| 6e 73 20 6d 65 6e 74 69 | 6f 6e 20 6f 6e 6c 79 20 |ns menti|on only |
|00003710| 66 69 6c 65 20 62 75 66 | 66 65 72 73 2e 0a 0a 54 |file buf|fers...T|
|00003720| 68 65 20 4d 20 63 6f 6c | 75 6d 6e 20 63 6f 6e 74 |he M col|umn cont|
|00003730| 61 69 6e 73 20 61 20 2a | 20 66 6f 72 20 62 75 66 |ains a *| for buf|
|00003740| 66 65 72 73 20 74 68 61 | 74 20 61 72 65 20 6d 6f |fers tha|t are mo|
|00003750| 64 69 66 69 65 64 2e 0a | 54 68 65 20 52 20 63 6f |dified..|The R co|
|00003760| 6c 75 6d 6e 20 63 6f 6e | 74 61 69 6e 73 20 61 20 |lumn con|tains a |
|00003770| 25 20 66 6f 72 20 62 75 | 66 66 65 72 73 20 74 68 |% for bu|ffers th|
|00003780| 61 74 20 61 72 65 20 72 | 65 61 64 2d 6f 6e 6c 79 |at are r|ead-only|
|00003790| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 6c 69 |...(defa|lias 'li|
|000037a0| 73 74 2d 62 75 66 66 65 | 72 73 2d 6e 6f 73 65 6c |st-buffe|rs-nosel|
|000037b0| 65 63 74 20 23 5b 28 26 | 6f 70 74 69 6f 6e 61 6c |ect #[(&|optional|
|000037c0| 20 66 69 6c 65 73 2d 6f | 6e 6c 79 29 20 22 c0 c1 | files-o|nly) "..|
|000037d0| 21 1a c3 5c 6e 0c c5 73 | ab 83 c6 aa 81 0c 5c 22 |!..\n..s|......\"|
|000037e0| 88 5c 6e 29 87 22 20 5b | 67 65 74 2d 62 75 66 66 |.\n)." [|get-buff|
|000037f0| 65 72 2d 63 72 65 61 74 | 65 20 22 2a 42 75 66 66 |er-creat|e "*Buff|
|00003800| 65 72 20 4c 69 73 74 2a | 22 20 62 75 66 66 65 72 |er List*|" buffer|
|00003810| 20 6c 69 73 74 2d 62 75 | 66 66 65 72 73 2d 69 6e | list-bu|ffers-in|
|00003820| 74 65 72 6e 61 6c 20 66 | 69 6c 65 73 2d 6f 6e 6c |ternal f|iles-onl|
|00003830| 79 20 28 74 20 6e 69 6c | 29 20 23 5b 28 62 29 20 |y (t nil|) #[(b) |
|00003840| 22 c0 09 21 89 1a 47 c3 | 55 ac 8a 5c 6e c3 48 c4 |"..!..G.|U..\n.H.|
|00003850| 55 ab 83 c5 aa 8a 0e 06 | ab 85 c7 09 21 aa 81 c8 |U.......|....!...|
|00003860| 29 87 22 20 5b 62 75 66 | 66 65 72 2d 6e 61 6d 65 |)." [buf|fer-name|
|00003870| 20 62 20 6e 20 30 20 3f | 5c 20 20 6e 69 6c 20 66 | b n 0 ?|\ nil f|
|00003880| 69 6c 65 73 2d 6f 6e 6c | 79 20 62 75 66 66 65 72 |iles-onl|y buffer|
|00003890| 2d 66 69 6c 65 2d 6e 61 | 6d 65 20 74 5d 20 33 5d |-file-na|me t] 3]|
|000038a0| 5d 20 34 20 28 23 24 20 | 2e 20 31 33 38 37 35 29 |] 4 (#$ |. 13875)|
|000038b0| 5d 29 0a 28 70 72 6f 76 | 69 64 65 20 27 62 75 66 |]).(prov|ide 'buf|
|000038c0| 66 2d 6d 65 6e 75 29 0a | |f-menu).| |
+--------+-------------------------+-------------------------+--------+--------+